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 (f1(v164) !== v2 ? (function(){
1359                     return v2;
1360                 })() : (f16(v163, f22(v164)) !== v2 ? (function(){
1361                     return (function(){
1362                         var tmp = v164;
1363                         return tmp === v2? v2: tmp.car;
1364                     })();
1365                 })() : (function(){
1366                     return f65(v163, (function(){
1367                         var tmp = v164;
1368                         return tmp === v2? v2: tmp.cdr;
1369                     })());
1370                 })()));
1371             }));
1372         })();
1373         return l32;
1374     })();
1375     return (function(){
1376         (function(){
1377             return f66 = (function(v165){
1378                 ((v165)["fname"] = "STRING=");
1379                 return v165;
1380             })((function (v166,v167){
1381                 if (arguments.length < 2) throw 'too few arguments';
1382                 if (arguments.length > 2) throw 'too many arguments';
1383                 return ((v166 == v167)?v3: v2);
1384             }));
1385         })();
1386         return l33;
1387     })();
1388 })();
1389 var l34 = f3("*NEWLINE*");
1390 var v168;
1391 (function(){
1392     (function(){
1393         return v168 = (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(v169){
1407             ((v169)["fname"] = "CONCAT");
1408             return v169;
1409         })((function (){
1410             var v170= v2;
1411             for (var i = arguments.length-1; i>=0; i--)
1412                 v170 = {car: arguments[i], cdr: v170};
1413             return f37(f44, v170, "");
1414         }));
1415     })();
1416     return l35;
1417 })();
1418 var l36 = f3("JOIN");
1419 var f68;
1420 (function(){
1421     (function(){
1422         return f68 = (function(v171){
1423             ((v171)["fname"] = "JOIN");
1424             return v171;
1425         })((function (v172,v173){
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             v173="";
1431             default: break;
1432             }
1433             return (f1(v172) !== v2 ? (function(){
1434                 return "";
1435             })() : (f1((function(){
1436                 var tmp = v172;
1437                 return tmp === v2? v2: tmp.cdr;
1438             })()) !== v2 ? (function(){
1439                 return (function(){
1440                     var tmp = v172;
1441                     return tmp === v2? v2: tmp.car;
1442                 })();
1443             })() : (function(){
1444                 return f67((function(){
1445                     var tmp = v172;
1446                     return tmp === v2? v2: tmp.car;
1447                 })(), v173, f68((function(){
1448                     var tmp = v172;
1449                     return tmp === v2? v2: tmp.cdr;
1450                 })(), v173));
1451             })()));
1452         }));
1453     })();
1454     return l36;
1455 })();
1456 var l37 = f3("JOIN-TRAILING");
1457 var f69;
1458 (function(){
1459     (function(){
1460         return f69 = (function(v174){
1461             ((v174)["fname"] = "JOIN-TRAILING");
1462             return v174;
1463         })((function (v175,v176){
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             v176="";
1469             default: break;
1470             }
1471             return (f1(v175) !== v2 ? "" : f67((function(){
1472                 var tmp = v175;
1473                 return tmp === v2? v2: tmp.car;
1474             })(), v176, f69((function(){
1475                 var tmp = v175;
1476                 return tmp === v2? v2: tmp.cdr;
1477             })(), v176)));
1478         }));
1479     })();
1480     return l37;
1481 })();
1482 var l38 = f3("INDENT");
1483 var f70;
1484 (function(){
1485     (function(){
1486         return f70 = (function(v177){
1487             ((v177)["fname"] = "INDENT");
1488             return v177;
1489         })((function (){
1490             var v178= v2;
1491             for (var i = arguments.length-1; i>=0; i--)
1492                 v178 = {car: arguments[i], cdr: v178};
1493             return (function(v179){
1494                 return (function(v180,v181,v182){
1495                     (f52(v182) !== v2 ? (function(){
1496                         return v180 = "    ";
1497                     })() : v2);
1498                     (function(){
1499                         while(((function(){
1500                             var x = v181;
1501                             var y = v182;
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                             v180 = f67(v180, ((f50((function(){
1509                                 var string = v179;
1510                                 var index = v181;
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 = v181;
1518                                 var y = f13(v182);
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 = v179;
1526                                 var index = f12(v181);
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(v179, v181, f12(v181))));
1538                             v181 = (function(){
1539                                 var x = v181;
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 v180;
1549                 })("",0,f43(v179));
1550             })(f37(f67, v178, ""));
1551         }));
1552     })();
1553     return l38;
1554 })();
1555 var l39 = f3("INTEGER-TO-STRING");
1556 var f6;
1557 (function(){
1558     (function(){
1559         return f6 = (function(v183){
1560             ((v183)["fname"] = "INTEGER-TO-STRING");
1561             return v183;
1562         })((function (v184){
1563             if (arguments.length < 1) throw 'too few arguments';
1564             if (arguments.length > 1) throw 'too many arguments';
1565             return (f14(v184) !== v2 ? (function(){
1566                 return "0";
1567             })() : (f53(v184) !== v2 ? (function(){
1568                 return f67("-", f6((function(){
1569                     var x = 0;
1570                     var y = v184;
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(v185){
1579                     (function(){
1580                         while(f17(f14(v184)) !== v2){
1581                             v185 = ({car: (function(){
1582                                 var x = v184;
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: v185});
1590                             v184 = f15(v184, 10);
1591                     }})();
1592                     return f68(f45((function (v186){
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 = v186;
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                     }), v185));
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(v187){
1626                 ((v187)["fname"] = "PRINT-TO-STRING");
1627                 return v187;
1628             })((function (v188){
1629                 if (arguments.length < 1) throw 'too few arguments';
1630                 if (arguments.length > 1) throw 'too many arguments';
1631                 return (((function(){
1632                     var tmp = v188;
1633                     return (typeof tmp == 'object' && 'name' in tmp);
1634                 })()?v3: v2) !== v2 ? (function(){
1635                     return (v188).name;
1636                 })() : (f51(v188) !== v2 ? (function(){
1637                     return f6(v188);
1638                 })() : (((typeof(v188) == "string")?v3: v2) !== v2 ? (function(){
1639                     return f67("\"", f72(v188), "\"");
1640                 })() : (((typeof v188 == 'function')?v3: v2) !== v2 ? (function(){
1641                     return (function(v189){
1642                         return (v189 !== v2 ? f67("#<FUNCTION ", v189, ">") : f67("#<FUNCTION>"));
1643                     })((function(){
1644                         var tmp = (v188)["fname"];
1645                         return tmp == undefined? v2: tmp ;
1646                     })());
1647                 })() : (f36(v188) !== v2 ? (function(){
1648                     return f67("(", f69(f45(f71, f56(v188)), " "), (function(v190){
1649                         return (f1((function(){
1650                             var tmp = v190;
1651                             return tmp === v2? v2: tmp.cdr;
1652                         })()) !== v2 ? f71((function(){
1653                             var tmp = v190;
1654                             return tmp === v2? v2: tmp.car;
1655                         })()) : f67(f71((function(){
1656                             var tmp = v190;
1657                             return tmp === v2? v2: tmp.car;
1658                         })()), " . ", f71((function(){
1659                             var tmp = v190;
1660                             return tmp === v2? v2: tmp.cdr;
1661                         })())));
1662                     })(f55(v188)), ")");
1663                 })() : v2)))));
1664             }));
1665         })();
1666         return l40;
1667     })();
1668     (function(){
1669         (function(){
1670             return f73 = (function(v191){
1671                 ((v191)["fname"] = "WRITE-LINE");
1672                 return v191;
1673             })((function (v192){
1674                 if (arguments.length < 1) throw 'too few arguments';
1675                 if (arguments.length > 1) throw 'too many arguments';
1676                 (function(){
1677                     var x = v192;
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 = v168;
1684                     if (typeof x != 'string')
1685                         throw 'The value ' + x + ' is not a type string.';
1686                     return lisp.write(x);
1687                 })();
1688                 return v192;
1689             }));
1690         })();
1691         return l41;
1692     })();
1693     return (function(){
1694         (function(){
1695             return f74 = (function(v193){
1696                 ((v193)["fname"] = "PRINT");
1697                 return v193;
1698             })((function (v194){
1699                 if (arguments.length < 1) throw 'too few arguments';
1700                 if (arguments.length > 1) throw 'too many arguments';
1701                 return f73(f71(v194));
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(v195){
1712             ((v195)["fname"] = "MAKE-STRING-STREAM");
1713             return v195;
1714         })((function (v196){
1715             if (arguments.length < 1) throw 'too few arguments';
1716             if (arguments.length > 1) throw 'too many arguments';
1717             return ({car: v196, 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(v197){
1727             ((v197)["fname"] = "%PEEK-CHAR");
1728             return v197;
1729         })((function (v198){
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 = v198;
1735                     return tmp === v2? v2: tmp.cdr;
1736                 })();
1737                 var y = f43((function(){
1738                     var tmp = v198;
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 = v198;
1749                     return tmp === v2? v2: tmp.car;
1750                 })();
1751                 var index = (function(){
1752                     var tmp = v198;
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(v199){
1770             ((v199)["fname"] = "%READ-CHAR");
1771             return v199;
1772         })((function (v200){
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 = v200;
1778                     return tmp === v2? v2: tmp.cdr;
1779                 })();
1780                 var y = f43((function(){
1781                     var tmp = v200;
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(v201){
1790                 (function(){
1791                     var x = v200;
1792                     if (typeof x != 'object')
1793                         throw 'The value ' + x + ' is not a type object.';
1794                     return (x.cdr = f12((function(){
1795                         var tmp = v200;
1796                         return tmp === v2? v2: tmp.cdr;
1797                     })()));
1798                 })();
1799                 return v201;
1800             })((function(){
1801                 var string = (function(){
1802                     var tmp = v200;
1803                     return tmp === v2? v2: tmp.car;
1804                 })();
1805                 var index = (function(){
1806                     var tmp = v200;
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(v202){
1824             ((v202)["fname"] = "WHITESPACEP");
1825             return v202;
1826         })((function (v203){
1827             if (arguments.length < 1) throw 'too few arguments';
1828             if (arguments.length > 1) throw 'too many arguments';
1829             return (function(v204){
1830                 return (v204 !== v2 ? v204 : (function(v205){
1831                     return (v205 !== v2 ? v205 : f50(v203, 9));
1832                 })(f50(v203, 10)));
1833             })(f50(v203, 32));
1834         }));
1835     })();
1836     return l46;
1837 })();
1838 var l47 = f3("SKIP-WHITESPACES");
1839 var f79;
1840 (function(){
1841     (function(){
1842         return f79 = (function(v206){
1843             ((v206)["fname"] = "SKIP-WHITESPACES");
1844             return v206;
1845         })((function (v207){
1846             if (arguments.length < 1) throw 'too few arguments';
1847             if (arguments.length > 1) throw 'too many arguments';
1848             return (function(v208){
1849                 v208 = f76(v207);
1850                 return (function(){
1851                     while((v208 !== v2 ? f78(v208) : v2) !== v2){
1852                         f77(v207);
1853                         v208 = f76(v207);
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(v209){
1865             ((v209)["fname"] = "TERMINALP");
1866             return v209;
1867         })((function (v210){
1868             if (arguments.length < 1) throw 'too few arguments';
1869             if (arguments.length > 1) throw 'too many arguments';
1870             return (function(v211){
1871                 return (v211 !== v2 ? v211 : (function(v212){
1872                     return (v212 !== v2 ? v212 : (function(v213){
1873                         return (v213 !== v2 ? v213 : f50(40, v210));
1874                     })(f50(41, v210)));
1875                 })(f78(v210)));
1876             })(f1(v210));
1877         }));
1878     })();
1879     return l48;
1880 })();
1881 var l49 = f3("READ-UNTIL");
1882 var f81;
1883 (function(){
1884     (function(){
1885         return f81 = (function(v214){
1886             ((v214)["fname"] = "READ-UNTIL");
1887             return v214;
1888         })((function (v215,v216){
1889             if (arguments.length < 2) throw 'too few arguments';
1890             if (arguments.length > 2) throw 'too many arguments';
1891             return (function(v217,v218){
1892                 v218 = f76(v215);
1893                 (function(){
1894                     while((v218 !== v2 ? f17((v216)(v218)) : v2) !== v2){
1895                         v217 = f67(v217, (function(){
1896                             var x = v218;
1897                             if (typeof x != 'number')
1898                                 throw 'The value ' + x + ' is not a type number.';
1899                             return String.fromCharCode(x);
1900                         })());
1901                         f77(v215);
1902                         v218 = f76(v215);
1903                 }})();
1904                 return v217;
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(v219){
1915             ((v219)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1916             return v219;
1917         })((function (v220){
1918             if (arguments.length < 1) throw 'too few arguments';
1919             if (arguments.length > 1) throw 'too many arguments';
1920             return (function(v221){
1921                 f79(v220);
1922                 v221 = f76(v220);
1923                 return (function(){
1924                     while((v221 !== v2 ? f50(v221, 59) : v2) !== v2){
1925                         f81(v220, (function (v222){
1926                             if (arguments.length < 1) throw 'too few arguments';
1927                             if (arguments.length > 1) throw 'too many arguments';
1928                             return f50(v222, 10);
1929                         }));
1930                         f79(v220);
1931                         v221 = f76(v220);
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(v223){
1943             ((v223)["fname"] = "%READ-LIST");
1944             return v223;
1945         })((function (v224){
1946             if (arguments.length < 1) throw 'too few arguments';
1947             if (arguments.length > 1) throw 'too many arguments';
1948             f82(v224);
1949             return (function(v225){
1950                 return (f1(v225) !== v2 ? (function(){
1951                     return (function (){ throw "Unspected EOF"; })();
1952                 })() : (f50(v225, 41) !== v2 ? (function(){
1953                     f77(v224);
1954                     return v2;
1955                 })() : (f50(v225, 46) !== v2 ? (function(){
1956                     f77(v224);
1957                     return (function(v226){
1958                         f82(v224);
1959                         (f50(f77(v224), 41) !== v2 ? v2 : (function(){
1960                             return (function (){ throw "')' was expected."; })();
1961                         })());
1962                         return v226;
1963                     })(f84(v224));
1964                 })() : (function(){
1965                     return ({car: f84(v224), cdr: f83(v224)});
1966                 })())));
1967             })(f76(v224));
1968         }));
1969     })();
1970     return l51;
1971 })();
1972 var l52 = f3("READ-STRING");
1973 var f85;
1974 (function(){
1975     (function(){
1976         return f85 = (function(v227){
1977             ((v227)["fname"] = "READ-STRING");
1978             return v227;
1979         })((function (v228){
1980             if (arguments.length < 1) throw 'too few arguments';
1981             if (arguments.length > 1) throw 'too many arguments';
1982             return (function(v229,v230){
1983                 v230 = f77(v228);
1984                 (function(){
1985                     while(f17(f16(v230, 34)) !== v2){
1986                         (f1(v230) !== v2 ? (function(){
1987                             return (function (){ throw "Unexpected EOF"; })();
1988                         })() : v2);
1989                         (f16(v230, 92) !== v2 ? (function(){
1990                             return v230 = f77(v228);
1991                         })() : v2);
1992                         v229 = f67(v229, (function(){
1993                             var x = v230;
1994                             if (typeof x != 'number')
1995                                 throw 'The value ' + x + ' is not a type number.';
1996                             return String.fromCharCode(x);
1997                         })());
1998                         v230 = f77(v228);
1999                 }})();
2000                 return v229;
2001             })("",v2);
2002         }));
2003     })();
2004     return l52;
2005 })();
2006 var l54 = f3("READ-SHARP");
2007 var l53 = f3("FUNCTION");
2008 var f86;
2009 (function(){
2010     (function(){
2011         return f86 = (function(v231){
2012             ((v231)["fname"] = "READ-SHARP");
2013             return v231;
2014         })((function (v232){
2015             if (arguments.length < 1) throw 'too few arguments';
2016             if (arguments.length > 1) throw 'too many arguments';
2017             f77(v232);
2018             return (function(v233){
2019                 return (f16(v233, 39) !== v2 ? (function(){
2020                     return f33(l53, f84(v232));
2021                 })() : (f16(v233, 92) !== v2 ? (function(){
2022                     return (function(v234){
2023                         return (f66(v234, "space") !== v2 ? (function(){
2024                             return f49(32);
2025                         })() : (f66(v234, "tab") !== v2 ? (function(){
2026                             return f49(9);
2027                         })() : (f66(v234, "newline") !== v2 ? (function(){
2028                             return f49(10);
2029                         })() : (function(){
2030                             return f49((function(){
2031                                 var string = v234;
2032                                 var index = 0;
2033                                 if (typeof string != 'string')
2034                                     throw 'The value ' + string + ' is not a type string.';
2035                                 if (typeof index != 'number')
2036                                     throw 'The value ' + index + ' is not a type number.';
2037                                 return string.charCodeAt(index);
2038                             })());
2039                         })())));
2040                     })(f67((function(){
2041                         var x = f77(v232);
2042                         if (typeof x != 'number')
2043                             throw 'The value ' + x + ' is not a type number.';
2044                         return String.fromCharCode(x);
2045                     })(), f81(v232, f80)));
2046                 })() : (f16(v233, 43) !== v2 ? (function(){
2047                     return (function(v235){
2048                         return (f66(v235, "common-lisp") !== v2 ? (function(){
2049                             f84(v232);
2050                             return f84(v232);
2051                         })() : (f66(v235, "ecmalisp") !== v2 ? (function(){
2052                             return f84(v232);
2053                         })() : (function(){
2054                             return (function (){ throw "Unknown reader form."; })();
2055                         })()));
2056                     })(f81(v232, f80));
2057                 })() : (function(){
2058                     return (function (){ throw "ECASE expression failed."; })();
2059                 })())));
2060             })(f77(v232));
2061         }));
2062     })();
2063     return l54;
2064 })();
2065 var l55 = f3("*EOF*");
2066 var v236;
2067 (function(){
2068     (function(){
2069         return v236 = (function(){
2070             var name = "EOF";
2071             if (typeof name != 'string')
2072                 throw 'The value ' + name + ' is not a type string.';
2073             return ({name: name});
2074         })();
2075     })();
2076     return l55;
2077 })();
2078 var l60 = f3("LS-READ");
2079 var l59 = f3("UNQUOTE");
2080 var l58 = f3("UNQUOTE-SPLICING");
2081 var l57 = f3("BACKQUOTE");
2082 var l56 = f3("QUOTE");
2083 var f84;
2084 (function(){
2085     (function(){
2086         return f84 = (function(v237){
2087             ((v237)["fname"] = "LS-READ");
2088             return v237;
2089         })((function (v238){
2090             if (arguments.length < 1) throw 'too few arguments';
2091             if (arguments.length > 1) throw 'too many arguments';
2092             f82(v238);
2093             return (function(v239){
2094                 return (f1(v239) !== v2 ? (function(){
2095                     return v236;
2096                 })() : (f50(v239, 40) !== v2 ? (function(){
2097                     f77(v238);
2098                     return f83(v238);
2099                 })() : (f50(v239, 39) !== v2 ? (function(){
2100                     f77(v238);
2101                     return f33(l56, f84(v238));
2102                 })() : (f50(v239, 96) !== v2 ? (function(){
2103                     f77(v238);
2104                     return f33(l57, f84(v238));
2105                 })() : (f50(v239, 34) !== v2 ? (function(){
2106                     f77(v238);
2107                     return f85(v238);
2108                 })() : (f50(v239, 44) !== v2 ? (function(){
2109                     f77(v238);
2110                     return (f16(f76(v238), 64) !== v2 ? (function(){
2111                         f77(v238);
2112                         return f33(l58, f84(v238));
2113                     })() : f33(l59, f84(v238)));
2114                 })() : (f50(v239, 35) !== v2 ? (function(){
2115                     return f86(v238);
2116                 })() : (function(){
2117                     return (function(v240){
2118                         return (f64(f61, v240) !== v2 ? f63(v240) : f3((function(){
2119                             var x = v240;
2120                             if (typeof x != 'string')
2121                                 throw 'The value ' + x + ' is not a type string.';
2122                             return x.toUpperCase();
2123                         })()));
2124                     })(f81(v238, f80));
2125                 })())))))));
2126             })(f76(v238));
2127         }));
2128     })();
2129     return l60;
2130 })();
2131 var l61 = f3("LS-READ-FROM-STRING");
2132 var f87;
2133 (function(){
2134     (function(){
2135         return f87 = (function(v241){
2136             ((v241)["fname"] = "LS-READ-FROM-STRING");
2137             return v241;
2138         })((function (v242){
2139             if (arguments.length < 1) throw 'too few arguments';
2140             if (arguments.length > 1) throw 'too many arguments';
2141             return f84(f75(v242));
2142         }));
2143     })();
2144     return l61;
2145 })();
2146 var l63 = f3("*COMPILATION-UNIT-CHECKS*");
2147 var l62 = f3("NIL");
2148 var v243;
2149 (function(){
2150     (function(){
2151         return v243 = l62;
2152     })();
2153     return l63;
2154 })();
2155 var l65 = f3("*ENV*");
2156 var l64 = f3("NIL");
2157 var v244;
2158 (function(){
2159     (function(){
2160         return v244 = l64;
2161     })();
2162     return l65;
2163 })();
2164 var l67 = f3("*FENV*");
2165 var l66 = f3("NIL");
2166 var v245;
2167 (function(){
2168     (function(){
2169         return v245 = l66;
2170     })();
2171     return l67;
2172 })();
2173 var l68 = f3("MAKE-BINDING");
2174 var f88;
2175 (function(){
2176     (function(){
2177         return f88 = (function(v246){
2178             ((v246)["fname"] = "MAKE-BINDING");
2179             return v246;
2180         })((function (v247,v248,v249,v250){
2181             if (arguments.length < 4) throw 'too few arguments';
2182             if (arguments.length > 4) throw 'too many arguments';
2183             return f33(v247, v248, v249, v250);
2184         }));
2185     })();
2186     return l68;
2187 })();
2188 var l69 = f3("BINDING-NAME");
2189 var f89;
2190 (function(){
2191     (function(){
2192         return f89 = (function(v251){
2193             ((v251)["fname"] = "BINDING-NAME");
2194             return v251;
2195         })((function (v252){
2196             if (arguments.length < 1) throw 'too few arguments';
2197             if (arguments.length > 1) throw 'too many arguments';
2198             return f29(v252);
2199         }));
2200     })();
2201     return l69;
2202 })();
2203 var l70 = f3("BINDING-TYPE");
2204 var f90;
2205 (function(){
2206     (function(){
2207         return f90 = (function(v253){
2208             ((v253)["fname"] = "BINDING-TYPE");
2209             return v253;
2210         })((function (v254){
2211             if (arguments.length < 1) throw 'too few arguments';
2212             if (arguments.length > 1) throw 'too many arguments';
2213             return f30(v254);
2214         }));
2215     })();
2216     return l70;
2217 })();
2218 var l71 = f3("BINDING-TRANSLATION");
2219 var f91;
2220 (function(){
2221     (function(){
2222         return f91 = (function(v255){
2223             ((v255)["fname"] = "BINDING-TRANSLATION");
2224             return v255;
2225         })((function (v256){
2226             if (arguments.length < 1) throw 'too few arguments';
2227             if (arguments.length > 1) throw 'too many arguments';
2228             return f31(v256);
2229         }));
2230     })();
2231     return l71;
2232 })();
2233 var l72 = f3("BINDING-DECLARED");
2234 var f92;
2235 (function(){
2236     (function(){
2237         return f92 = (function(v257){
2238             ((v257)["fname"] = "BINDING-DECLARED");
2239             return v257;
2240         })((function (v258){
2241             if (arguments.length < 1) throw 'too few arguments';
2242             if (arguments.length > 1) throw 'too many arguments';
2243             return (v258 !== v2 ? f32(v258) : v2);
2244         }));
2245     })();
2246     return l72;
2247 })();
2248 var l73 = f3("MARK-BINDING-AS-DECLARED");
2249 var f93;
2250 (function(){
2251     (function(){
2252         return f93 = (function(v259){
2253             ((v259)["fname"] = "MARK-BINDING-AS-DECLARED");
2254             return v259;
2255         })((function (v260){
2256             if (arguments.length < 1) throw 'too few arguments';
2257             if (arguments.length > 1) throw 'too many arguments';
2258             return (function(){
2259                 var x = f27(v260);
2260                 if (typeof x != 'object')
2261                     throw 'The value ' + x + ' is not a type object.';
2262                 return (x.car = v3);
2263             })();
2264         }));
2265     })();
2266     return l73;
2267 })();
2268 var l74 = f3("*VARIABLE-COUNTER*");
2269 var v261;
2270 (function(){
2271     (function(){
2272         return v261 = 0;
2273     })();
2274     return l74;
2275 })();
2276 var l75 = f3("GVARNAME");
2277 var f94;
2278 (function(){
2279     (function(){
2280         return f94 = (function(v262){
2281             ((v262)["fname"] = "GVARNAME");
2282             return v262;
2283         })((function (v263){
2284             if (arguments.length < 1) throw 'too few arguments';
2285             if (arguments.length > 1) throw 'too many arguments';
2286             return f67("v", f6(v261 = (function(){
2287                 var x = v261;
2288                 var y = 1;
2289                 if (typeof x != 'number')
2290                     throw 'The value ' + x + ' is not a type number.';
2291                 if (typeof y != 'number')
2292                     throw 'The value ' + y + ' is not a type number.';
2293                 return x+y;
2294             })()));
2295         }));
2296     })();
2297     return l75;
2298 })();
2299 var l77 = f3("LOOKUP-VARIABLE");
2300 var l76 = f3("VARIABLE");
2301 var f95;
2302 (function(){
2303     (function(){
2304         return f95 = (function(v264){
2305             ((v264)["fname"] = "LOOKUP-VARIABLE");
2306             return v264;
2307         })((function (v265,v266){
2308             if (arguments.length < 2) throw 'too few arguments';
2309             if (arguments.length > 2) throw 'too many arguments';
2310             return (function(v267){
2311                 return (v267 !== v2 ? v267 : (function(v268){
2312                     return (v268 !== v2 ? v268 : (function(v269,v270){
2313                         v244 = ({car: v270, cdr: v244});
2314                         v243 = ({car: (function (){
2315                             if (arguments.length > 0) throw 'too many arguments';
2316                             return (f92(f65(v265, v244)) !== v2 ? v2 : (function(){
2317                                 return (function (){ throw f67("Undefined variable `", v269, "'"); })();
2318                             })());
2319                         }), cdr: v243});
2320                         return v270;
2321                     })((v265).name,f88(v265, l76, f94(v265), v2)));
2322                 })(f65(v265, v244)));
2323             })(f65(v265, v266));
2324         }));
2325     })();
2326     return l77;
2327 })();
2328 var l78 = f3("LOOKUP-VARIABLE-TRANSLATION");
2329 var f96;
2330 (function(){
2331     (function(){
2332         return f96 = (function(v271){
2333             ((v271)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2334             return v271;
2335         })((function (v272,v273){
2336             if (arguments.length < 2) throw 'too few arguments';
2337             if (arguments.length > 2) throw 'too many arguments';
2338             return f91(f95(v272, v273));
2339         }));
2340     })();
2341     return l78;
2342 })();
2343 var l80 = f3("EXTEND-LOCAL-ENV");
2344 var l79 = f3("VARIABLE");
2345 var f97;
2346 (function(){
2347     (function(){
2348         return f97 = (function(v274){
2349             ((v274)["fname"] = "EXTEND-LOCAL-ENV");
2350             return v274;
2351         })((function (v275,v276){
2352             if (arguments.length < 2) throw 'too few arguments';
2353             if (arguments.length > 2) throw 'too many arguments';
2354             return f39(f45((function (v277){
2355                 if (arguments.length < 1) throw 'too few arguments';
2356                 if (arguments.length > 1) throw 'too many arguments';
2357                 return f88(v277, l79, f94(v277), v3);
2358             }), v275), v276);
2359         }));
2360     })();
2361     return l80;
2362 })();
2363 var l81 = f3("*FUNCTION-COUNTER*");
2364 var v278;
2365 (function(){
2366     (function(){
2367         return v278 = 0;
2368     })();
2369     return l81;
2370 })();
2371 var l83 = f3("LOOKUP-FUNCTION");
2372 var l82 = f3("FUNCTION");
2373 var f98;
2374 (function(){
2375     (function(){
2376         return f98 = (function(v279){
2377             ((v279)["fname"] = "LOOKUP-FUNCTION");
2378             return v279;
2379         })((function (v280,v281){
2380             if (arguments.length < 2) throw 'too few arguments';
2381             if (arguments.length > 2) throw 'too many arguments';
2382             return (function(v282){
2383                 return (v282 !== v2 ? v282 : (function(v283){
2384                     return (v283 !== v2 ? v283 : (function(v284,v285){
2385                         v245 = ({car: v285, cdr: v245});
2386                         v243 = ({car: (function (){
2387                             if (arguments.length > 0) throw 'too many arguments';
2388                             return (f92(f65(v280, v245)) !== v2 ? v2 : (function(){
2389                                 return (function (){ throw f67("Undefined function `", v284, "'"); })();
2390                             })());
2391                         }), cdr: v243});
2392                         return v285;
2393                     })((v280).name,f88(v280, l82, f67("f", f6(v278 = (function(){
2394                         var x = v278;
2395                         var y = 1;
2396                         if (typeof x != 'number')
2397                             throw 'The value ' + x + ' is not a type number.';
2398                         if (typeof y != 'number')
2399                             throw 'The value ' + y + ' is not a type number.';
2400                         return x+y;
2401                     })())), v2)));
2402                 })(f65(v280, v245)));
2403             })(f65(v280, v281));
2404         }));
2405     })();
2406     return l83;
2407 })();
2408 var l84 = f3("LOOKUP-FUNCTION-TRANSLATION");
2409 var f99;
2410 (function(){
2411     (function(){
2412         return f99 = (function(v286){
2413             ((v286)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2414             return v286;
2415         })((function (v287,v288){
2416             if (arguments.length < 2) throw 'too few arguments';
2417             if (arguments.length > 2) throw 'too many arguments';
2418             return f91(f98(v287, v288));
2419         }));
2420     })();
2421     return l84;
2422 })();
2423 var l85 = f3("*TOPLEVEL-COMPILATIONS*");
2424 var v289;
2425 (function(){
2426     (function(){
2427         return v289 = v2;
2428     })();
2429     return l85;
2430 })();
2431 var l86 = f3("%COMPILE-DEFVAR");
2432 var f100;
2433 (function(){
2434     (function(){
2435         return f100 = (function(v290){
2436             ((v290)["fname"] = "%COMPILE-DEFVAR");
2437             return v290;
2438         })((function (v291){
2439             if (arguments.length < 1) throw 'too few arguments';
2440             if (arguments.length > 1) throw 'too many arguments';
2441             return (function(v292){
2442                 f93(v292);
2443                 return v289 = ({car: f67("var ", f91(v292)), cdr: v289});
2444             })(f95(v291, v244));
2445         }));
2446     })();
2447     return l86;
2448 })();
2449 var l87 = f3("%COMPILE-DEFUN");
2450 var f101;
2451 (function(){
2452     (function(){
2453         return f101 = (function(v293){
2454             ((v293)["fname"] = "%COMPILE-DEFUN");
2455             return v293;
2456         })((function (v294){
2457             if (arguments.length < 1) throw 'too few arguments';
2458             if (arguments.length > 1) throw 'too many arguments';
2459             return (function(v295){
2460                 f93(v295);
2461                 return v289 = ({car: f67("var ", f91(v295)), cdr: v289});
2462             })(f98(v294, v245));
2463         }));
2464     })();
2465     return l87;
2466 })();
2467 var l89 = f3("%COMPILE-DEFMACRO");
2468 var l88 = f3("MACRO");
2469 var f102;
2470 (function(){
2471     (function(){
2472         return f102 = (function(v296){
2473             ((v296)["fname"] = "%COMPILE-DEFMACRO");
2474             return v296;
2475         })((function (v297,v298){
2476             if (arguments.length < 2) throw 'too few arguments';
2477             if (arguments.length > 2) throw 'too many arguments';
2478             return v245 = ({car: f88(v297, l88, v298, v3), cdr: v245});
2479         }));
2480     })();
2481     return l89;
2482 })();
2483 var l90 = f3("*COMPILATIONS*");
2484 var v299;
2485 (function(){
2486     (function(){
2487         return v299 = v2;
2488     })();
2489     return l90;
2490 })();
2491 var l91 = f3("LS-COMPILE-BLOCK");
2492 var f103;
2493 (function(){
2494     (function(){
2495         return f103 = (function(v300){
2496             ((v300)["fname"] = "LS-COMPILE-BLOCK");
2497             return v300;
2498         })((function (v301,v302,v303){
2499             if (arguments.length < 3) throw 'too few arguments';
2500             if (arguments.length > 3) throw 'too many arguments';
2501             return f69(f59((function (v304){
2502                 if (arguments.length < 1) throw 'too few arguments';
2503                 if (arguments.length > 1) throw 'too many arguments';
2504                 return (function(v305){
2505                     return (v305 !== v2 ? v305 : (((typeof(v304) == "string")?v3: v2) !== v2 ? f14(f43(v304)) : v2));
2506                 })(f1(v304));
2507             }), f45((function (v306){
2508                 if (arguments.length < 1) throw 'too few arguments';
2509                 if (arguments.length > 1) throw 'too many arguments';
2510                 return f104(v306, v302, v303);
2511             }), v301)), f67(";", v168));
2512         }));
2513     })();
2514     return l91;
2515 })();
2516 var l92 = f3("IF");
2517 v299 = ({car: f33(l92, (function (v307,v308,v309,v310,v311){
2518     if (arguments.length < 5) throw 'too few arguments';
2519     if (arguments.length > 5) throw 'too many arguments';
2520     return f67("(", f104(v309, v307, v308), " !== ", f104(v2, v2, v2), " ? ", f104(v310, v307, v308), " : ", f104(v311, v307, v308), ")");
2521 })), cdr: v299});
2522 var l94 = f3("*LAMBDA-LIST-KEYWORDS*");
2523 var l93 = {car: f3("&OPTIONAL"), cdr: {car: f3("&REST"), cdr: f3("NIL")}};
2524 var v312;
2525 (function(){
2526     (function(){
2527         return v312 = l93;
2528     })();
2529     return l94;
2530 })();
2531 var l95 = f3("LIST-UNTIL-KEYWORD");
2532 var f105;
2533 (function(){
2534     (function(){
2535         return f105 = (function(v313){
2536             ((v313)["fname"] = "LIST-UNTIL-KEYWORD");
2537             return v313;
2538         })((function (v314){
2539             if (arguments.length < 1) throw 'too few arguments';
2540             if (arguments.length > 1) throw 'too many arguments';
2541             return ((function(v315){
2542                 return (v315 !== v2 ? v315 : f57((function(){
2543                     var tmp = v314;
2544                     return tmp === v2? v2: tmp.car;
2545                 })(), v312));
2546             })(f1(v314)) !== v2 ? v2 : ({car: (function(){
2547                 var tmp = v314;
2548                 return tmp === v2? v2: tmp.car;
2549             })(), cdr: f105((function(){
2550                 var tmp = v314;
2551                 return tmp === v2? v2: tmp.cdr;
2552             })())}));
2553         }));
2554     })();
2555     return l95;
2556 })();
2557 var l96 = f3("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2558 var f106;
2559 (function(){
2560     (function(){
2561         return f106 = (function(v316){
2562             ((v316)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2563             return v316;
2564         })((function (v317){
2565             if (arguments.length < 1) throw 'too few arguments';
2566             if (arguments.length > 1) throw 'too many arguments';
2567             return f105(v317);
2568         }));
2569     })();
2570     return l96;
2571 })();
2572 var l98 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2573 var l97 = f3("&OPTIONAL");
2574 var f107;
2575 (function(){
2576     (function(){
2577         return f107 = (function(v318){
2578             ((v318)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2579             return v318;
2580         })((function (v319){
2581             if (arguments.length < 1) throw 'too few arguments';
2582             if (arguments.length > 1) throw 'too many arguments';
2583             return f45(f35, f105((function(){
2584                 var tmp = f57(l97, v319);
2585                 return tmp === v2? v2: tmp.cdr;
2586             })()));
2587         }));
2588     })();
2589     return l98;
2590 })();
2591 var l99 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2592 var f108;
2593 (function(){
2594     (function(){
2595         return f108 = (function(v320){
2596             ((v320)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2597             return v320;
2598         })((function (v321){
2599             if (arguments.length < 1) throw 'too few arguments';
2600             if (arguments.length > 1) throw 'too many arguments';
2601             return f45(f20, f107(v321));
2602         }));
2603     })();
2604     return l99;
2605 })();
2606 var l101 = f3("LAMBDA-LIST-REST-ARGUMENT");
2607 var l100 = f3("&REST");
2608 var f109;
2609 (function(){
2610     (function(){
2611         return f109 = (function(v322){
2612             ((v322)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2613             return v322;
2614         })((function (v323){
2615             if (arguments.length < 1) throw 'too few arguments';
2616             if (arguments.length > 1) throw 'too many arguments';
2617             return (function(v324){
2618                 ((function(){
2619                     var tmp = v324;
2620                     return tmp === v2? v2: tmp.cdr;
2621                 })() !== v2 ? (function(){
2622                     return (function (){ throw "Bad lambda-list"; })();
2623                 })() : v2);
2624                 return (function(){
2625                     var tmp = v324;
2626                     return tmp === v2? v2: tmp.car;
2627                 })();
2628             })(f105((function(){
2629                 var tmp = f57(l100, v323);
2630                 return tmp === v2? v2: tmp.cdr;
2631             })()));
2632         }));
2633     })();
2634     return l101;
2635 })();
2636 var l102 = f3("LAMBDA");
2637 v299 = ({car: f33(l102, (function (v326,v327,v328){
2638     if (arguments.length < 3) throw 'too few arguments';
2639     var v325= v2;
2640     for (var i = arguments.length-1; i>=3; i--)
2641         v325 = {car: arguments[i], cdr: v325};
2642     return (function(v329,v330,v331){
2643         return (function(v332,v333,v334){
2644             return f67("(function (", f68(f45((function (v335){
2645                 if (arguments.length < 1) throw 'too few arguments';
2646                 if (arguments.length > 1) throw 'too many arguments';
2647                 return f96(v335, v334);
2648             }), f39(v329, v330)), ","), "){", v168, f70((v329 !== v2 ? f67("if (arguments.length < ", f6(v332), ") throw 'too few arguments';", v168) : ""), (f17(v331) !== v2 ? f67("if (arguments.length > ", f6((function(){
2649                 var x = v332;
2650                 var y = v333;
2651                 if (typeof x != 'number')
2652                     throw 'The value ' + x + ' is not a type number.';
2653                 if (typeof y != 'number')
2654                     throw 'The value ' + y + ' is not a type number.';
2655                 return x+y;
2656             })()), ") throw 'too many arguments';", v168) : ""), (v330 !== v2 ? f67("switch(arguments.length){", v168, (function(v336,v337,v338){
2657                 return (function(){
2658                     (function(){
2659                         while(((function(){
2660                             var x = v338;
2661                             var y = v333;
2662                             if (typeof x != 'number')
2663                                 throw 'The value ' + x + ' is not a type number.';
2664                             if (typeof y != 'number')
2665                                 throw 'The value ' + y + ' is not a type number.';
2666                             return x<y;
2667                         })()?v3: v2) !== v2){
2668                             (function(v339){
2669                                 v337 = ({car: f67("case ", f6((function(){
2670                                     var x = v338;
2671                                     var y = v332;
2672                                     if (typeof x != 'number')
2673                                         throw 'The value ' + x + ' is not a type number.';
2674                                     if (typeof y != 'number')
2675                                         throw 'The value ' + y + ' is not a type number.';
2676                                     return x+y;
2677                                 })()), ":", v168, f96((function(){
2678                                     var tmp = v339;
2679                                     return tmp === v2? v2: tmp.car;
2680                                 })(), v334), "=", f104(f23(v339), v334, v327), ";", v168), cdr: v337});
2681                                 return v338 = (function(){
2682                                     var x = v338;
2683                                     var y = 1;
2684                                     if (typeof x != 'number')
2685                                         throw 'The value ' + x + ' is not a type number.';
2686                                     if (typeof y != 'number')
2687                                         throw 'The value ' + y + ' is not a type number.';
2688                                     return x+y;
2689                                 })();
2690                             })(f54(v338, v336));
2691                     }})();
2692                     v337 = ({car: f67("default: break;", v168), cdr: v337});
2693                     return f68(f41(v337));
2694                 })();
2695             })(f107(v328),v2,0), "}", v168) : ""), (v331 !== v2 ? (function(v340){
2696                 return f67("var ", v340, "= ", f104(v2, v326, v327), ";", v168, "for (var i = arguments.length-1; i>=", f6((function(){
2697                     var x = v332;
2698                     var y = v333;
2699                     if (typeof x != 'number')
2700                         throw 'The value ' + x + ' is not a type number.';
2701                     if (typeof y != 'number')
2702                         throw 'The value ' + y + ' is not a type number.';
2703                     return x+y;
2704                 })()), "; i--)", v168, f70(v340, " = ", "{car: arguments[i], cdr: "), v340, "};", v168);
2705             })(f96(v331, v334)) : ""), f67(f103(f56(v325), v334, v327), "return ", f104((function(){
2706                 var tmp = f55(v325);
2707                 return tmp === v2? v2: tmp.car;
2708             })(), v334, v327), ";")), v168, "})");
2709         })(f43(v329),f43(v330),f97(f39(f35(v331), v329, v330), v326));
2710     })(f106(v328),f108(v328),f109(v328));
2711 })), cdr: v299});
2712 var l103 = f3("FSETQ");
2713 v299 = ({car: f33(l103, (function (v341,v342,v343,v344){
2714     if (arguments.length < 4) throw 'too few arguments';
2715     if (arguments.length > 4) throw 'too many arguments';
2716     return f67(f99(v343, v342), " = ", f104(v344, v341, v342));
2717 })), cdr: v299});
2718 var l104 = f3("SETQ");
2719 v299 = ({car: f33(l104, (function (v345,v346,v347,v348){
2720     if (arguments.length < 4) throw 'too few arguments';
2721     if (arguments.length > 4) throw 'too many arguments';
2722     return f67(f96(v347, v345), " = ", f104(v348, v345, v346));
2723 })), cdr: v299});
2724 var l105 = f3("ESCAPE-STRING");
2725 var f72;
2726 (function(){
2727     (function(){
2728         return f72 = (function(v349){
2729             ((v349)["fname"] = "ESCAPE-STRING");
2730             return v349;
2731         })((function (v350){
2732             if (arguments.length < 1) throw 'too few arguments';
2733             if (arguments.length > 1) throw 'too many arguments';
2734             return (function(v351,v352,v353){
2735                 (function(){
2736                     while(((function(){
2737                         var x = v352;
2738                         var y = v353;
2739                         if (typeof x != 'number')
2740                             throw 'The value ' + x + ' is not a type number.';
2741                         if (typeof y != 'number')
2742                             throw 'The value ' + y + ' is not a type number.';
2743                         return x<y;
2744                     })()?v3: v2) !== v2){
2745                         (function(v354){
2746                             ((function(v355){
2747                                 return (v355 !== v2 ? v355 : f50(v354, 92));
2748                             })(f50(v354, 34)) !== v2 ? (function(){
2749                                 return v351 = f67(v351, "\\");
2750                             })() : v2);
2751                             (f50(v354, 10) !== v2 ? (function(){
2752                                 v351 = f67(v351, "\\");
2753                                 return v354 = 110;
2754                             })() : v2);
2755                             return v351 = f67(v351, (function(){
2756                                 var x = v354;
2757                                 if (typeof x != 'number')
2758                                     throw 'The value ' + x + ' is not a type number.';
2759                                 return String.fromCharCode(x);
2760                             })());
2761                         })((function(){
2762                             var string = v350;
2763                             var index = v352;
2764                             if (typeof string != 'string')
2765                                 throw 'The value ' + string + ' is not a type string.';
2766                             if (typeof index != 'number')
2767                                 throw 'The value ' + index + ' is not a type number.';
2768                             return string.charCodeAt(index);
2769                         })());
2770                         v352 = (function(){
2771                             var x = v352;
2772                             var y = 1;
2773                             if (typeof x != 'number')
2774                                 throw 'The value ' + x + ' is not a type number.';
2775                             if (typeof y != 'number')
2776                                 throw 'The value ' + y + ' is not a type number.';
2777                             return x+y;
2778                         })();
2779                 }})();
2780                 return v351;
2781             })("",0,f43(v350));
2782         }));
2783     })();
2784     return l105;
2785 })();
2786 var l107 = f3("LITERAL->JS");
2787 var l106 = f3("INTERN");
2788 var f110;
2789 (function(){
2790     (function(){
2791         return f110 = (function(v356){
2792             ((v356)["fname"] = "LITERAL->JS");
2793             return v356;
2794         })((function (v357){
2795             if (arguments.length < 1) throw 'too few arguments';
2796             if (arguments.length > 1) throw 'too many arguments';
2797             return (f51(v357) !== v2 ? (function(){
2798                 return f6(v357);
2799             })() : (((typeof(v357) == "string")?v3: v2) !== v2 ? (function(){
2800                 return f67("\"", f72(v357), "\"");
2801             })() : (((function(){
2802                 var tmp = v357;
2803                 return (typeof tmp == 'object' && 'name' in tmp);
2804             })()?v3: v2) !== v2 ? (function(){
2805                 return f104(f39(f33(l106), f33(f72((v357).name))), v244, v245);
2806             })() : (((function(){
2807                 var tmp = v357;
2808                 return (typeof tmp == 'object' && 'car' in tmp);
2809             })()?v3: v2) !== v2 ? (function(){
2810                 return f67("{car: ", f110((function(){
2811                     var tmp = v357;
2812                     return tmp === v2? v2: tmp.car;
2813                 })()), ", cdr: ", f110((function(){
2814                     var tmp = v357;
2815                     return tmp === v2? v2: tmp.cdr;
2816                 })()), "}");
2817             })() : v2))));
2818         }));
2819     })();
2820     return l107;
2821 })();
2822 var l108 = f3("*LITERAL-COUNTER*");
2823 var v358;
2824 (function(){
2825     (function(){
2826         return v358 = 0;
2827     })();
2828     return l108;
2829 })();
2830 var l109 = f3("LITERAL");
2831 var f111;
2832 (function(){
2833     (function(){
2834         return f111 = (function(v359){
2835             ((v359)["fname"] = "LITERAL");
2836             return v359;
2837         })((function (v360){
2838             if (arguments.length < 1) throw 'too few arguments';
2839             if (arguments.length > 1) throw 'too many arguments';
2840             return (function(v361){
2841                 v289 = ({car: f67("var ", v361, " = ", f110(v360)), cdr: v289});
2842                 return v361;
2843             })(f67("l", f6(v358 = (function(){
2844                 var x = v358;
2845                 var y = 1;
2846                 if (typeof x != 'number')
2847                     throw 'The value ' + x + ' is not a type number.';
2848                 if (typeof y != 'number')
2849                     throw 'The value ' + y + ' is not a type number.';
2850                 return x+y;
2851             })())));
2852         }));
2853     })();
2854     return l109;
2855 })();
2856 var l110 = f3("QUOTE");
2857 v299 = ({car: f33(l110, (function (v362,v363,v364){
2858     if (arguments.length < 3) throw 'too few arguments';
2859     if (arguments.length > 3) throw 'too many arguments';
2860     return f111(v364);
2861 })), cdr: v299});
2862 var l111 = f3("WHILE");
2863 v299 = ({car: f33(l111, (function (v366,v367,v368){
2864     if (arguments.length < 3) throw 'too few arguments';
2865     var v365= v2;
2866     for (var i = arguments.length-1; i>=3; i--)
2867         v365 = {car: arguments[i], cdr: v365};
2868     return f67("(function(){", v168, f70("while(", f104(v368, v366, v367), " !== ", f104(v2, v2, v2), "){", v168, f70(f103(v365, v366, v367))), "}})()");
2869 })), cdr: v299});
2870 var l113 = f3("LAMBDA");
2871 var l112 = f3("FUNCTION");
2872 v299 = ({car: f33(l112, (function (v369,v370,v371){
2873     if (arguments.length < 3) throw 'too few arguments';
2874     if (arguments.length > 3) throw 'too many arguments';
2875     return ((f36(v371) !== v2 ? (((function(){
2876         var tmp = v371;
2877         return tmp === v2? v2: tmp.car;
2878     })() === l113)?v3: v2) : v2) !== v2 ? (function(){
2879         return f104(v371, v369, v370);
2880     })() : (((function(){
2881         var tmp = v371;
2882         return (typeof tmp == 'object' && 'name' in tmp);
2883     })()?v3: v2) !== v2 ? (function(){
2884         return f99(v371, v370);
2885     })() : v2));
2886 })), cdr: v299});
2887 var l115 = f3("PROGN");
2888 var l114 = f3("EVAL-WHEN-COMPILE");
2889 v299 = ({car: f33(l114, (function (v373,v374){
2890     if (arguments.length < 2) throw 'too few arguments';
2891     var v372= v2;
2892     for (var i = arguments.length-1; i>=2; i--)
2893         v372 = {car: arguments[i], cdr: v372};
2894     f112(({car: l115, cdr: v372}));
2895     return "";
2896 })), cdr: v299});
2897 var l116 = f3("PROGN");
2898 v299 = ({car: f33(l116, (function (v376,v377){
2899     if (arguments.length < 2) throw 'too few arguments';
2900     var v375= v2;
2901     for (var i = arguments.length-1; i>=2; i--)
2902         v375 = {car: arguments[i], cdr: v375};
2903     return f67("(function(){", v168, f70(f103(f56(v375), v376, v377), "return ", f104((function(){
2904         var tmp = f55(v375);
2905         return tmp === v2? v2: tmp.car;
2906     })(), v376, v377), ";", v168), "})()");
2907 })), cdr: v299});
2908 var l117 = f3("LET");
2909 v299 = ({car: f33(l117, (function (v379,v380,v381){
2910     if (arguments.length < 3) throw 'too few arguments';
2911     var v378= v2;
2912     for (var i = arguments.length-1; i>=3; i--)
2913         v378 = {car: arguments[i], cdr: v378};
2914     return (function(v382){
2915         return (function(v383,v384){
2916             return (function(v385){
2917                 return f67("(function(", f68(f45((function (v386){
2918                     if (arguments.length < 1) throw 'too few arguments';
2919                     if (arguments.length > 1) throw 'too many arguments';
2920                     return f96(v386, v385);
2921                 }), v383), ","), "){", v168, f70(f103(f56(v378), v385, v380), "return ", f104((function(){
2922                     var tmp = f55(v378);
2923                     return tmp === v2? v2: tmp.car;
2924                 })(), v385, v380), ";", v168), "})(", f68(f45((function (v387){
2925                     if (arguments.length < 1) throw 'too few arguments';
2926                     if (arguments.length > 1) throw 'too many arguments';
2927                     return f104(v387, v379, v380);
2928                 }), v384), ","), ")");
2929             })(f97(v383, v379));
2930         })(f45(f29, v382),f45(f30, v382));
2931     })(f45(f35, v381));
2932 })), cdr: v299});
2933 var l126 = f3("BACKQUOTE-EXPAND-1");
2934 var l125 = f3("LIST");
2935 var l124 = f3("UNQUOTE-SPLICING");
2936 var l123 = f3("LIST");
2937 var l122 = f3("UNQUOTE");
2938 var l121 = f3("APPEND");
2939 var l120 = f3("BACKQUOTE");
2940 var l119 = f3("UNQUOTE");
2941 var l118 = f3("QUOTE");
2942 var f113;
2943 (function(){
2944     (function(){
2945         return f113 = (function(v388){
2946             ((v388)["fname"] = "BACKQUOTE-EXPAND-1");
2947             return v388;
2948         })((function (v389){
2949             if (arguments.length < 1) throw 'too few arguments';
2950             if (arguments.length > 1) throw 'too many arguments';
2951             return (((function(){
2952                 var tmp = v389;
2953                 return (typeof tmp == 'object' && 'name' in tmp);
2954             })()?v3: v2) !== v2 ? (function(){
2955                 return f33(l118, v389);
2956             })() : (f34(v389) !== v2 ? (function(){
2957                 return v389;
2958             })() : ((((function(){
2959                 var tmp = v389;
2960                 return tmp === v2? v2: tmp.car;
2961             })() === l119)?v3: v2) !== v2 ? (function(){
2962                 return (function(){
2963                     var tmp = v389;
2964                     return tmp === v2? v2: tmp.car;
2965                 })();
2966             })() : ((((function(){
2967                 var tmp = v389;
2968                 return tmp === v2? v2: tmp.car;
2969             })() === l120)?v3: v2) !== v2 ? (function(){
2970                 return f113(f113(f23(v389)));
2971             })() : (function(){
2972                 return ({car: l121, cdr: f45((function (v390){
2973                     if (arguments.length < 1) throw 'too few arguments';
2974                     if (arguments.length > 1) throw 'too many arguments';
2975                     return ((f36(v390) !== v2 ? (((function(){
2976                         var tmp = v390;
2977                         return tmp === v2? v2: tmp.car;
2978                     })() === l122)?v3: v2) : v2) !== v2 ? (function(){
2979                         return f33(l123, f23(v390));
2980                     })() : ((f36(v390) !== v2 ? (((function(){
2981                         var tmp = v390;
2982                         return tmp === v2? v2: tmp.car;
2983                     })() === l124)?v3: v2) : v2) !== v2 ? (function(){
2984                         return f23(v390);
2985                     })() : (function(){
2986                         return f33(l125, f113(v390));
2987                     })()));
2988                 }), v389)});
2989             })()))));
2990         }));
2991     })();
2992     return l126;
2993 })();
2994 var l128 = f3("BACKQUOTE-EXPAND");
2995 var l127 = f3("BACKQUOTE");
2996 var f114;
2997 (function(){
2998     (function(){
2999         return f114 = (function(v391){
3000             ((v391)["fname"] = "BACKQUOTE-EXPAND");
3001             return v391;
3002         })((function (v392){
3003             if (arguments.length < 1) throw 'too few arguments';
3004             if (arguments.length > 1) throw 'too many arguments';
3005             return ((f36(v392) !== v2 ? (((function(){
3006                 var tmp = v392;
3007                 return tmp === v2? v2: tmp.car;
3008             })() === l127)?v3: v2) : v2) !== v2 ? f113(f23(v392)) : v392);
3009         }));
3010     })();
3011     return l128;
3012 })();
3013 var l129 = f3("BACKQUOTE");
3014 v299 = ({car: f33(l129, (function (v393,v394,v395){
3015     if (arguments.length < 3) throw 'too few arguments';
3016     if (arguments.length > 3) throw 'too many arguments';
3017     return f104(f113(v395), v393, v394);
3018 })), cdr: v299});
3019 var l130 = f3("COMPILE-BOOL");
3020 var f115;
3021 (function(){
3022     (function(){
3023         return f115 = (function(v396){
3024             ((v396)["fname"] = "COMPILE-BOOL");
3025             return v396;
3026         })((function (v397){
3027             if (arguments.length < 1) throw 'too few arguments';
3028             if (arguments.length > 1) throw 'too many arguments';
3029             return f67("(", v397, "?", f104(v3, v2, v2), ": ", f104(v2, v2, v2), ")");
3030         }));
3031     })();
3032     return l130;
3033 })();
3034 var l131 = f3("NUM-OP-NUM");
3035 var f116;
3036 (function(){
3037     (function(){
3038         return f116 = (function(v398){
3039             ((v398)["fname"] = "NUM-OP-NUM");
3040             return v398;
3041         })((function (v399,v400,v401){
3042             if (arguments.length < 3) throw 'too few arguments';
3043             if (arguments.length > 3) throw 'too many arguments';
3044             return f67("(function(){", v168, f70(f67("var ", "x", " = ", v399, ";", v168), f67("var ", "y", " = ", v401, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("if (typeof ", "y", " != '", "number", "')", v168, f70("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3045                 return f67("x", v400, "y");
3046             })(), ";", v168)), "})()");
3047         }));
3048     })();
3049     return l131;
3050 })();
3051 var l132 = f3("+");
3052 v299 = ({car: f33(l132, (function (v402,v403,v404,v405){
3053     if (arguments.length < 4) throw 'too few arguments';
3054     if (arguments.length > 4) throw 'too many arguments';
3055     return (function(v406,v407){
3056         return f116(v406, "+", v407);
3057     })(f104(v404, v402, v403),f104(v405, v402, v403));
3058 })), cdr: v299});
3059 var l133 = f3("-");
3060 v299 = ({car: f33(l133, (function (v408,v409,v410,v411){
3061     if (arguments.length < 4) throw 'too few arguments';
3062     if (arguments.length > 4) throw 'too many arguments';
3063     return (function(v412,v413){
3064         return f116(v412, "-", v413);
3065     })(f104(v410, v408, v409),f104(v411, v408, v409));
3066 })), cdr: v299});
3067 var l134 = f3("*");
3068 v299 = ({car: f33(l134, (function (v414,v415,v416,v417){
3069     if (arguments.length < 4) throw 'too few arguments';
3070     if (arguments.length > 4) throw 'too many arguments';
3071     return (function(v418,v419){
3072         return f116(v418, "*", v419);
3073     })(f104(v416, v414, v415),f104(v417, v414, v415));
3074 })), cdr: v299});
3075 var l135 = f3("/");
3076 v299 = ({car: f33(l135, (function (v420,v421,v422,v423){
3077     if (arguments.length < 4) throw 'too few arguments';
3078     if (arguments.length > 4) throw 'too many arguments';
3079     return (function(v424,v425){
3080         return f116(v424, "/", v425);
3081     })(f104(v422, v420, v421),f104(v423, v420, v421));
3082 })), cdr: v299});
3083 var l136 = f3("MOD");
3084 v299 = ({car: f33(l136, (function (v426,v427,v428,v429){
3085     if (arguments.length < 4) throw 'too few arguments';
3086     if (arguments.length > 4) throw 'too many arguments';
3087     return (function(v430,v431){
3088         return f116(v430, "%", v431);
3089     })(f104(v428, v426, v427),f104(v429, v426, v427));
3090 })), cdr: v299});
3091 var l137 = f3("<");
3092 v299 = ({car: f33(l137, (function (v432,v433,v434,v435){
3093     if (arguments.length < 4) throw 'too few arguments';
3094     if (arguments.length > 4) throw 'too many arguments';
3095     return (function(v436,v437){
3096         return f115(f116(v436, "<", v437));
3097     })(f104(v434, v432, v433),f104(v435, v432, v433));
3098 })), cdr: v299});
3099 var l138 = f3(">");
3100 v299 = ({car: f33(l138, (function (v438,v439,v440,v441){
3101     if (arguments.length < 4) throw 'too few arguments';
3102     if (arguments.length > 4) throw 'too many arguments';
3103     return (function(v442,v443){
3104         return f115(f116(v442, ">", v443));
3105     })(f104(v440, v438, v439),f104(v441, v438, v439));
3106 })), cdr: v299});
3107 var l139 = f3("=");
3108 v299 = ({car: f33(l139, (function (v444,v445,v446,v447){
3109     if (arguments.length < 4) throw 'too few arguments';
3110     if (arguments.length > 4) throw 'too many arguments';
3111     return (function(v448,v449){
3112         return f115(f116(v448, "==", v449));
3113     })(f104(v446, v444, v445),f104(v447, v444, v445));
3114 })), cdr: v299});
3115 var l140 = f3("<=");
3116 v299 = ({car: f33(l140, (function (v450,v451,v452,v453){
3117     if (arguments.length < 4) throw 'too few arguments';
3118     if (arguments.length > 4) throw 'too many arguments';
3119     return (function(v454,v455){
3120         return f115(f116(v454, "<=", v455));
3121     })(f104(v452, v450, v451),f104(v453, v450, v451));
3122 })), cdr: v299});
3123 var l141 = f3(">=");
3124 v299 = ({car: f33(l141, (function (v456,v457,v458,v459){
3125     if (arguments.length < 4) throw 'too few arguments';
3126     if (arguments.length > 4) throw 'too many arguments';
3127     return (function(v460,v461){
3128         return f115(f116(v460, ">=", v461));
3129     })(f104(v458, v456, v457),f104(v459, v456, v457));
3130 })), cdr: v299});
3131 var l142 = f3("NUMBERP");
3132 v299 = ({car: f33(l142, (function (v462,v463,v464){
3133     if (arguments.length < 3) throw 'too few arguments';
3134     if (arguments.length > 3) throw 'too many arguments';
3135     return (function(v465){
3136         return f115(f67("(typeof (", v465, ") == \"number\")"));
3137     })(f104(v464, v462, v463));
3138 })), cdr: v299});
3139 var l143 = f3("FLOOR");
3140 v299 = ({car: f33(l143, (function (v466,v467,v468){
3141     if (arguments.length < 3) throw 'too few arguments';
3142     if (arguments.length > 3) throw 'too many arguments';
3143     return (function(v469){
3144         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v469, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3145             return "Math.floor(x)";
3146         })(), ";", v168)), "})()");
3147     })(f104(v468, v466, v467));
3148 })), cdr: v299});
3149 var l144 = f3("CONS");
3150 v299 = ({car: f33(l144, (function (v470,v471,v472,v473){
3151     if (arguments.length < 4) throw 'too few arguments';
3152     if (arguments.length > 4) throw 'too many arguments';
3153     return (function(v474,v475){
3154         return f67("({car: ", v474, ", cdr: ", v475, "})");
3155     })(f104(v472, v470, v471),f104(v473, v470, v471));
3156 })), cdr: v299});
3157 var l145 = f3("CONSP");
3158 v299 = ({car: f33(l145, (function (v476,v477,v478){
3159     if (arguments.length < 3) throw 'too few arguments';
3160     if (arguments.length > 3) throw 'too many arguments';
3161     return (function(v479){
3162         return f115(f67("(function(){", v168, f70("var tmp = ", v479, ";", v168, "return (typeof tmp == 'object' && 'car' in tmp);", v168), "})()"));
3163     })(f104(v478, v476, v477));
3164 })), cdr: v299});
3165 var l146 = f3("CAR");
3166 v299 = ({car: f33(l146, (function (v480,v481,v482){
3167     if (arguments.length < 3) throw 'too few arguments';
3168     if (arguments.length > 3) throw 'too many arguments';
3169     return (function(v483){
3170         return f67("(function(){", v168, f70("var tmp = ", v483, ";", v168, "return tmp === ", f104(v2, v2, v2), "? ", f104(v2, v2, v2), ": tmp.car;", v168), "})()");
3171     })(f104(v482, v480, v481));
3172 })), cdr: v299});
3173 var l147 = f3("CDR");
3174 v299 = ({car: f33(l147, (function (v484,v485,v486){
3175     if (arguments.length < 3) throw 'too few arguments';
3176     if (arguments.length > 3) throw 'too many arguments';
3177     return (function(v487){
3178         return f67("(function(){", v168, f70("var tmp = ", v487, ";", v168, "return tmp === ", f104(v2, v2, v2), "? ", f104(v2, v2, v2), ": tmp.cdr;", v168), "})()");
3179     })(f104(v486, v484, v485));
3180 })), cdr: v299});
3181 var l148 = f3("SETCAR");
3182 v299 = ({car: f33(l148, (function (v488,v489,v490,v491){
3183     if (arguments.length < 4) throw 'too few arguments';
3184     if (arguments.length > 4) throw 'too many arguments';
3185     return (function(v492,v493){
3186         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v492, ";", v168), f67("if (typeof ", "x", " != '", "object", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v168)), f67("return ", (function(){
3187             return f67("(x.car = ", v493, ")");
3188         })(), ";", v168)), "})()");
3189     })(f104(v490, v488, v489),f104(v491, v488, v489));
3190 })), cdr: v299});
3191 var l149 = f3("SETCDR");
3192 v299 = ({car: f33(l149, (function (v494,v495,v496,v497){
3193     if (arguments.length < 4) throw 'too few arguments';
3194     if (arguments.length > 4) throw 'too many arguments';
3195     return (function(v498,v499){
3196         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v498, ";", v168), f67("if (typeof ", "x", " != '", "object", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v168)), f67("return ", (function(){
3197             return f67("(x.cdr = ", v499, ")");
3198         })(), ";", v168)), "})()");
3199     })(f104(v496, v494, v495),f104(v497, v494, v495));
3200 })), cdr: v299});
3201 var l150 = f3("SYMBOLP");
3202 v299 = ({car: f33(l150, (function (v500,v501,v502){
3203     if (arguments.length < 3) throw 'too few arguments';
3204     if (arguments.length > 3) throw 'too many arguments';
3205     return (function(v503){
3206         return f115(f67("(function(){", v168, f70("var tmp = ", v503, ";", v168, "return (typeof tmp == 'object' && 'name' in tmp);", v168), "})()"));
3207     })(f104(v502, v500, v501));
3208 })), cdr: v299});
3209 var l151 = f3("MAKE-SYMBOL");
3210 v299 = ({car: f33(l151, (function (v504,v505,v506){
3211     if (arguments.length < 3) throw 'too few arguments';
3212     if (arguments.length > 3) throw 'too many arguments';
3213     return (function(v507){
3214         return f67("(function(){", v168, f70(f67("var ", "name", " = ", v507, ";", v168), f67("if (typeof ", "name", " != '", "string", "')", v168, f70("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3215             return "({name: name})";
3216         })(), ";", v168)), "})()");
3217     })(f104(v506, v504, v505));
3218 })), cdr: v299});
3219 var l152 = f3("SYMBOL-NAME");
3220 v299 = ({car: f33(l152, (function (v508,v509,v510){
3221     if (arguments.length < 3) throw 'too few arguments';
3222     if (arguments.length > 3) throw 'too many arguments';
3223     return (function(v511){
3224         return f67("(", v511, ").name");
3225     })(f104(v510, v508, v509));
3226 })), cdr: v299});
3227 var l153 = f3("EQ");
3228 v299 = ({car: f33(l153, (function (v512,v513,v514,v515){
3229     if (arguments.length < 4) throw 'too few arguments';
3230     if (arguments.length > 4) throw 'too many arguments';
3231     return (function(v516,v517){
3232         return f115(f67("(", v516, " === ", v517, ")"));
3233     })(f104(v514, v512, v513),f104(v515, v512, v513));
3234 })), cdr: v299});
3235 var l154 = f3("EQUAL");
3236 v299 = ({car: f33(l154, (function (v518,v519,v520,v521){
3237     if (arguments.length < 4) throw 'too few arguments';
3238     if (arguments.length > 4) throw 'too many arguments';
3239     return (function(v522,v523){
3240         return f115(f67("(", v522, " == ", v523, ")"));
3241     })(f104(v520, v518, v519),f104(v521, v518, v519));
3242 })), cdr: v299});
3243 var l155 = f3("STRING");
3244 v299 = ({car: f33(l155, (function (v524,v525,v526){
3245     if (arguments.length < 3) throw 'too few arguments';
3246     if (arguments.length > 3) throw 'too many arguments';
3247     return (function(v527){
3248         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v527, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3249             return "String.fromCharCode(x)";
3250         })(), ";", v168)), "})()");
3251     })(f104(v526, v524, v525));
3252 })), cdr: v299});
3253 var l156 = f3("STRINGP");
3254 v299 = ({car: f33(l156, (function (v528,v529,v530){
3255     if (arguments.length < 3) throw 'too few arguments';
3256     if (arguments.length > 3) throw 'too many arguments';
3257     return (function(v531){
3258         return f115(f67("(typeof(", v531, ") == \"string\")"));
3259     })(f104(v530, v528, v529));
3260 })), cdr: v299});
3261 var l157 = f3("STRING-UPCASE");
3262 v299 = ({car: f33(l157, (function (v532,v533,v534){
3263     if (arguments.length < 3) throw 'too few arguments';
3264     if (arguments.length > 3) throw 'too many arguments';
3265     return (function(v535){
3266         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v535, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3267             return "x.toUpperCase()";
3268         })(), ";", v168)), "})()");
3269     })(f104(v534, v532, v533));
3270 })), cdr: v299});
3271 var l158 = f3("STRING-LENGTH");
3272 v299 = ({car: f33(l158, (function (v536,v537,v538){
3273     if (arguments.length < 3) throw 'too few arguments';
3274     if (arguments.length > 3) throw 'too many arguments';
3275     return (function(v539){
3276         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v539, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3277             return "x.length";
3278         })(), ";", v168)), "})()");
3279     })(f104(v538, v536, v537));
3280 })), cdr: v299});
3281 var l159 = f3("SLICE");
3282 v299 = ({car: f33(l159, (function (v540,v541,v542,v543,v544){
3283     if (arguments.length < 4) throw 'too few arguments';
3284     if (arguments.length > 5) throw 'too many arguments';
3285     switch(arguments.length){
3286     case 4:
3287     v544=v2;
3288     default: break;
3289     }
3290     return f67("(function(){", v168, f70("var str = ", f104(v542, v540, v541), ";", v168, "var a = ", f104(v543, v540, v541), ";", v168, "var b;", v168, (v544 !== v2 ? f67("b = ", f104(v544, v540, v541), ";", v168) : ""), "return str.slice(a,b);", v168), "})()");
3291 })), cdr: v299});
3292 var l160 = f3("CHAR");
3293 v299 = ({car: f33(l160, (function (v545,v546,v547,v548){
3294     if (arguments.length < 4) throw 'too few arguments';
3295     if (arguments.length > 4) throw 'too many arguments';
3296     return (function(v549,v550){
3297         return f67("(function(){", v168, f70(f67("var ", "string", " = ", v549, ";", v168), f67("var ", "index", " = ", v550, ";", v168), f67("if (typeof ", "string", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v168)), f67("if (typeof ", "index", " != '", "number", "')", v168, f70("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3298             return "string.charCodeAt(index)";
3299         })(), ";", v168)), "})()");
3300     })(f104(v547, v545, v546),f104(v548, v545, v546));
3301 })), cdr: v299});
3302 var l161 = f3("CONCAT-TWO");
3303 v299 = ({car: f33(l161, (function (v551,v552,v553,v554){
3304     if (arguments.length < 4) throw 'too few arguments';
3305     if (arguments.length > 4) throw 'too many arguments';
3306     return (function(v555,v556){
3307         return f67("(function(){", v168, f70(f67("var ", "string1", " = ", v555, ";", v168), f67("var ", "string2", " = ", v556, ";", v168), f67("if (typeof ", "string1", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v168)), f67("if (typeof ", "string2", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3308             return "string1.concat(string2)";
3309         })(), ";", v168)), "})()");
3310     })(f104(v553, v551, v552),f104(v554, v551, v552));
3311 })), cdr: v299});
3312 var l162 = f3("FUNCALL");
3313 v299 = ({car: f33(l162, (function (v558,v559,v560){
3314     if (arguments.length < 3) throw 'too few arguments';
3315     var v557= v2;
3316     for (var i = arguments.length-1; i>=3; i--)
3317         v557 = {car: arguments[i], cdr: v557};
3318     return f67("(", f104(v560, v558, v559), ")(", f68(f45((function (v561){
3319         if (arguments.length < 1) throw 'too few arguments';
3320         if (arguments.length > 1) throw 'too many arguments';
3321         return f104(v561, v558, v559);
3322     }), v557), ", "), ")");
3323 })), cdr: v299});
3324 var l163 = f3("APPLY");
3325 v299 = ({car: f33(l163, (function (v563,v564,v565){
3326     if (arguments.length < 3) throw 'too few arguments';
3327     var v562= v2;
3328     for (var i = arguments.length-1; i>=3; i--)
3329         v562 = {car: arguments[i], cdr: v562};
3330     return (f1(v562) !== v2 ? f67("(", f104(v565, v563, v564), ")()") : (function(v566,v567){
3331         return f67("(function(){", v168, f70("var f = ", f104(v565, v563, v564), ";", v168, "var args = [", f68(f45((function (v568){
3332             if (arguments.length < 1) throw 'too few arguments';
3333             if (arguments.length > 1) throw 'too many arguments';
3334             return f104(v568, v563, v564);
3335         }), v566), ", "), "];", v168, "var tail = (", f104(v567, v563, v564), ");", v168, f70("while (tail != ", f104(v2, v563, v564), "){", v168, "    args.push(tail.car);", v168, "    tail = tail.cdr;", v168, "}", v168, "return f.apply(this, args);", v168), "})()"));
3336     })(f56(v562),(function(){
3337         var tmp = f55(v562);
3338         return tmp === v2? v2: tmp.car;
3339     })()));
3340 })), cdr: v299});
3341 var l164 = f3("JS-EVAL");
3342 v299 = ({car: f33(l164, (function (v569,v570,v571){
3343     if (arguments.length < 3) throw 'too few arguments';
3344     if (arguments.length > 3) throw 'too many arguments';
3345     return (function(v572){
3346         return f67("(function(){", v168, f70(f67("var ", "string", " = ", v572, ";", v168), f67("if (typeof ", "string", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3347             return "eval.apply(window, [string])";
3348         })(), ";", v168)), "})()");
3349     })(f104(v571, v569, v570));
3350 })), cdr: v299});
3351 var l165 = f3("ERROR");
3352 v299 = ({car: f33(l165, (function (v573,v574,v575){
3353     if (arguments.length < 3) throw 'too few arguments';
3354     if (arguments.length > 3) throw 'too many arguments';
3355     return (function(v576){
3356         return f67("(function (){ throw ", v576, "; })()");
3357     })(f104(v575, v573, v574));
3358 })), cdr: v299});
3359 var l166 = f3("NEW");
3360 v299 = ({car: f33(l166, (function (v577,v578){
3361     if (arguments.length < 2) throw 'too few arguments';
3362     if (arguments.length > 2) throw 'too many arguments';
3363     return (function(){
3364         return "{}";
3365     })();
3366 })), cdr: v299});
3367 var l167 = f3("GET");
3368 v299 = ({car: f33(l167, (function (v579,v580,v581,v582){
3369     if (arguments.length < 4) throw 'too few arguments';
3370     if (arguments.length > 4) throw 'too many arguments';
3371     return (function(v583,v584){
3372         return f67("(function(){", v168, f70("var tmp = ", "(", v583, ")[", v584, "];", v168, "return tmp == undefined? ", f104(v2, v2, v2), ": tmp ;", v168), "})()");
3373     })(f104(v581, v579, v580),f104(v582, v579, v580));
3374 })), cdr: v299});
3375 var l168 = f3("SET");
3376 v299 = ({car: f33(l168, (function (v585,v586,v587,v588,v589){
3377     if (arguments.length < 5) throw 'too few arguments';
3378     if (arguments.length > 5) throw 'too many arguments';
3379     return (function(v590,v591,v592){
3380         return f67("((", v590, ")[", v591, "] = ", v592, ")");
3381     })(f104(v587, v585, v586),f104(v588, v585, v586),f104(v589, v585, v586));
3382 })), cdr: v299});
3383 var l169 = f3("IN");
3384 v299 = ({car: f33(l169, (function (v593,v594,v595,v596){
3385     if (arguments.length < 4) throw 'too few arguments';
3386     if (arguments.length > 4) throw 'too many arguments';
3387     return (function(v597,v598){
3388         return f115(f67("((", v597, ") in (", v598, "))"));
3389     })(f104(v595, v593, v594),f104(v596, v593, v594));
3390 })), cdr: v299});
3391 var l170 = f3("FUNCTIONP");
3392 v299 = ({car: f33(l170, (function (v599,v600,v601){
3393     if (arguments.length < 3) throw 'too few arguments';
3394     if (arguments.length > 3) throw 'too many arguments';
3395     return (function(v602){
3396         return f115(f67("(typeof ", v602, " == 'function')"));
3397     })(f104(v601, v599, v600));
3398 })), cdr: v299});
3399 var l171 = f3("WRITE-STRING");
3400 v299 = ({car: f33(l171, (function (v603,v604,v605){
3401     if (arguments.length < 3) throw 'too few arguments';
3402     if (arguments.length > 3) throw 'too many arguments';
3403     return (function(v606){
3404         return f67("(function(){", v168, f70(f67("var ", "x", " = ", v606, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3405             return "lisp.write(x)";
3406         })(), ";", v168)), "})()");
3407     })(f104(v605, v603, v604));
3408 })), cdr: v299});
3409 var l173 = f3("MACROP");
3410 var l172 = f3("MACRO");
3411 var f117;
3412 (function(){
3413     (function(){
3414         return f117 = (function(v607){
3415             ((v607)["fname"] = "MACROP");
3416             return v607;
3417         })((function (v608){
3418             if (arguments.length < 1) throw 'too few arguments';
3419             if (arguments.length > 1) throw 'too many arguments';
3420             return (((function(){
3421                 var tmp = v608;
3422                 return (typeof tmp == 'object' && 'name' in tmp);
3423             })()?v3: v2) !== v2 ? ((f90(f98(v608, v245)) === l172)?v3: v2) : v2);
3424         }));
3425     })();
3426     return l173;
3427 })();
3428 var l175 = f3("LS-MACROEXPAND-1");
3429 var l174 = f3("MACRO");
3430 var f118;
3431 (function(){
3432     (function(){
3433         return f118 = (function(v609){
3434             ((v609)["fname"] = "LS-MACROEXPAND-1");
3435             return v609;
3436         })((function (v610,v611,v612){
3437             if (arguments.length < 3) throw 'too few arguments';
3438             if (arguments.length > 3) throw 'too many arguments';
3439             return (f117((function(){
3440                 var tmp = v610;
3441                 return tmp === v2? v2: tmp.car;
3442             })()) !== v2 ? (function(v613){
3443                 return (((f90(v613) === l174)?v3: v2) !== v2 ? (function(){
3444                     var f = f112(f91(v613));
3445                     var args = [];
3446                     var tail = ((function(){
3447                         var tmp = v610;
3448                         return tmp === v2? v2: tmp.cdr;
3449                     })());
3450                         while (tail != v2){
3451                             args.push(tail.car);
3452                             tail = tail.cdr;
3453                         }
3454                         return f.apply(this, args);
3455                     })() : v610);
3456             })(f98((function(){
3457                 var tmp = v610;
3458                 return tmp === v2? v2: tmp.car;
3459             })(), v244)) : v610);
3460         }));
3461     })();
3462     return l175;
3463 })();
3464 var l177 = f3("COMPILE-FUNCALL");
3465 var l176 = f3("LAMBDA");
3466 var f119;
3467 (function(){
3468     (function(){
3469         return f119 = (function(v614){
3470             ((v614)["fname"] = "COMPILE-FUNCALL");
3471             return v614;
3472         })((function (v615,v616,v617,v618){
3473             if (arguments.length < 4) throw 'too few arguments';
3474             if (arguments.length > 4) throw 'too many arguments';
3475             return (((function(){
3476                 var tmp = v615;
3477                 return (typeof tmp == 'object' && 'name' in tmp);
3478             })()?v3: v2) !== v2 ? (function(){
3479                 return f67(f99(v615, v618), "(", f68(f45((function (v619){
3480                     if (arguments.length < 1) throw 'too few arguments';
3481                     if (arguments.length > 1) throw 'too many arguments';
3482                     return f104(v619, v617, v618);
3483                 }), v616), ", "), ")");
3484             })() : ((f36(v615) !== v2 ? (((function(){
3485                 var tmp = v615;
3486                 return tmp === v2? v2: tmp.car;
3487             })() === l176)?v3: v2) : v2) !== v2 ? (function(){
3488                 return f67("(", f104(v615, v617, v618), ")(", f68(f45((function (v620){
3489                     if (arguments.length < 1) throw 'too few arguments';
3490                     if (arguments.length > 1) throw 'too many arguments';
3491                     return f104(v620, v617, v618);
3492                 }), v616), ", "), ")");
3493             })() : (function(){
3494                 return (function (){ throw f67("Invalid function designator ", (v615).name); })();
3495             })()));
3496         }));
3497     })();
3498     return l177;
3499 })();
3500 var l178 = f3("LS-COMPILE");
3501 var f104;
3502 (function(){
3503     (function(){
3504         return f104 = (function(v621){
3505             ((v621)["fname"] = "LS-COMPILE");
3506             return v621;
3507         })((function (v622,v623,v624){
3508             if (arguments.length < 3) throw 'too few arguments';
3509             if (arguments.length > 3) throw 'too many arguments';
3510             return (((function(){
3511                 var tmp = v622;
3512                 return (typeof tmp == 'object' && 'name' in tmp);
3513             })()?v3: v2) !== v2 ? (function(){
3514                 return f96(v622, v623);
3515             })() : (f51(v622) !== v2 ? (function(){
3516                 return f6(v622);
3517             })() : (((typeof(v622) == "string")?v3: v2) !== v2 ? (function(){
3518                 return f67("\"", f72(v622), "\"");
3519             })() : (f36(v622) !== v2 ? (function(){
3520                 return (f65((function(){
3521                     var tmp = v622;
3522                     return tmp === v2? v2: tmp.car;
3523                 })(), v299) !== v2 ? (function(v625){
3524                     return (function(){
3525                         var f = v625;
3526                         var args = [v623, v624];
3527                         var tail = ((function(){
3528                             var tmp = v622;
3529                             return tmp === v2? v2: tmp.cdr;
3530                         })());
3531                             while (tail != v2){
3532                                 args.push(tail.car);
3533                                 tail = tail.cdr;
3534                             }
3535                             return f.apply(this, args);
3536                         })();
3537                 })(f30(f65((function(){
3538                     var tmp = v622;
3539                     return tmp === v2? v2: tmp.car;
3540                 })(), v299))) : (f117((function(){
3541                     var tmp = v622;
3542                     return tmp === v2? v2: tmp.car;
3543                 })()) !== v2 ? f104(f118(v622, v623, v624), v623, v624) : f119((function(){
3544                     var tmp = v622;
3545                     return tmp === v2? v2: tmp.car;
3546                 })(), (function(){
3547                     var tmp = v622;
3548                     return tmp === v2? v2: tmp.cdr;
3549                 })(), v623, v624)));
3550             })() : v2))));
3551         }));
3552     })();
3553     return l178;
3554 })();
3555 var l179 = f3("LS-COMPILE-TOPLEVEL");
3556 var f120;
3557 (function(){
3558     (function(){
3559         return f120 = (function(v626){
3560             ((v626)["fname"] = "LS-COMPILE-TOPLEVEL");
3561             return v626;
3562         })((function (v627){
3563             if (arguments.length < 1) throw 'too few arguments';
3564             if (arguments.length > 1) throw 'too many arguments';
3565             v289 = v2;
3566             return (function(v628){
3567                 return (function(v629){
3568                     v289 = v2;
3569                     return v629;
3570                 })(f67(f68(f45((function (v630){
3571                     if (arguments.length < 1) throw 'too few arguments';
3572                     if (arguments.length > 1) throw 'too many arguments';
3573                     return f67(v630, ";", v168);
3574                 }), v289)), v628));
3575             })(f104(v627, v2, v2));
3576         }));
3577     })();
3578     return l179;
3579 })();
3580 var l190 = f3("LS-COMPILE-TOPLEVEL");
3581 var l189 = f3("EVAL");
3582 var l188 = f3("PRINT-TO-STRING");
3583 var l187 = f3("LS-READ-FROM-STRING");
3584 var l186 = 139;
3585 var l185 = 184;
3586 var l184 = 120;
3587 var l183 = 636;
3588 var l182 = {car: {car: f3("*LITERAL-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v358", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v312", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v299", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v289", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FUNCTION-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v278", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*VARIABLE-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v261", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FENV*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v245", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*ENV*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v244", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v243", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*EOF*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v236", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*NEWLINE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v168", 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")}}}}}}}}}}}}}}};
3589 var l181 = {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("SETQ"), cdr: {car: f3("*ENV*"), cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: {car: f3("FUNCTION"), cdr: {car: f3("BINDING-DECLARED"), cdr: f3("NIL")}}, cdr: {car: f3("*ENV*"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("SETQ"), cdr: {car: f3("*FENV*"), cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: {car: f3("FUNCTION"), cdr: {car: f3("BINDING-DECLARED"), cdr: f3("NIL")}}, cdr: {car: f3("*FENV*"), cdr: f3("NIL")}}}, 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: "f120", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-FUNCALL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f119", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-MACROEXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f118", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MACROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f117", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NUM-OP-NUM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f116", 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: "f115", 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: {car: f3("FENV"), 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: "f114", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f113", 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: {car: f3("FENV"), 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: "f112", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f111", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL->JS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f110", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f109", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f108", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f107", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f106", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-UNTIL-KEYWORD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f105", 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: f3("FENV"), 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: "f104", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-BLOCK"), cdr: {car: f3("FUNCTION"), cdr: {car: "f103", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f102", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f101", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f100", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f99", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f98", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LOCAL-ENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f97", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f96", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f95", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GVARNAME"), 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("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), 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: 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")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
3590 var l180 = f3("EVAL");
3591 var f112;
3592 v245 = l181;
3593 v244 = l182;
3594 v261 = l183;
3595 v278 = l184;
3596 v358 = l185;
3597 v12 = l186;
3598 (function(){
3599     (function(){
3600         (function(){
3601             return f112 = (function(v631){
3602                 ((v631)["fname"] = "EVAL");
3603                 return v631;
3604             })((function (v632){
3605                 if (arguments.length < 1) throw 'too few arguments';
3606                 if (arguments.length > 1) throw 'too many arguments';
3607                 return (function(v633){
3608                     return (function(){
3609                         var string = v633;
3610                         if (typeof string != 'string')
3611                             throw 'The value ' + string + ' is not a type string.';
3612                         return eval.apply(window, [string]);
3613                     })();
3614                 })((function(v634){
3615                     (function(v635,v636){
3616                         return (function(){
3617                             while(v635 !== v2){
3618                                 v636 = (function(){
3619                                     var tmp = v635;
3620                                     return tmp === v2? v2: tmp.car;
3621                                 })();
3622                                 (v636)();
3623                                 v635 = (function(){
3624                                     var tmp = v635;
3625                                     return tmp === v2? v2: tmp.cdr;
3626                                 })();
3627                         }})();
3628                     })(v243,v2);
3629                     return v634;
3630                 })((function(){
3631                     v243 = v2;
3632                     v244 = f60(f92, v244);
3633                     v245 = f60(f92, v245);
3634                     return f120(v632);
3635                 })()));
3636             }));
3637         })();
3638         return l180;
3639     })();
3640     return (function(){
3641         var string = f67("var lisp = {};", "lisp.read = ", f99(l187, v2), ";", v168, "lisp.print = ", f99(l188, v2), ";", v168, "lisp.eval = ", f99(l189, v2), ";", v168, "lisp.compile = ", f99(l190, v2), ";", v168, "lisp.evalString = function(str){", v168, "   return lisp.eval(lisp.read(str));", v168, "}", v168, "lisp.compileString = function(str){", v168, "   return lisp.compile(lisp.read(str));", v168, "}", v168);
3642         if (typeof string != 'string')
3643             throw 'The value ' + string + ' is not a type string.';
3644         return eval.apply(window, [string]);
3645     })();
3646 })();