ecmalisp.js

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