hÆ°s8€p€,€ì€LAMBDAF€€2€D€p€,€lFASD-DATA€D€¬€wkf€ìMaurice Ravel€†€<§ÐjF€‚F€D€p€,COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEl‚Gigamos Cambridge€p€B€ ,PACKAGE€ìLISP-INTERNALSp€B€ lREADTABLE€¬‚standard Common-Lisp1€D€CIN-PACKAGED€Ã€QUOTE€B€51€D€Ã€DEFVARƒ*READ-BASE*€F€ ¬†Default radix in which to read integers and ratios.€1€D€B€?‚*READ-SUPPRESS*€ƒ€NIL€,‰Suppress most of the actions of the reader, mostly to support #+ and #-1€D€B€?ƒƒ*READ-DEFAULT-FLOAT-FORMAT*€D€B€;ƒSINGLE-FLOAT,‰A floating-point number read or printed with the E marker has this type.1€D€B€?C‚*ALLOW-DOT-TOKENS*B€Fl•When T, if the reader encounters a token that is just a period, read thattoken in as the value of *reader-dot-token*. When NIL, raise an error if such a token is read.1€D€B€?C‚*READER-DOT-TOKEN*D€ƒ€CONSD€B€;ÃTHE-DOT-TOKEN€B€F¬‡This is the object read in when a single-dot token is read.€1€D€DEFMACROC‚DO-ARRAY-ELEMENTS€D€D€ELEMENT€INDICES€Ã€ARRAY€Ã€&BODY€ƒ€BODYlIterate over each element of ARRAY, with ELEMENT bound to that element andINDICES bound to a list of the indices of that element.D€pÀl€SIlXR-BQ-LISTD€B€;Ã€DOLISTD€B€hB€_D€B€hD€B€;Ã‚GENERATE-PERMUTATIONS€D€B€hD€B€;‚ARRAY-DIMENSIONSB€`D€pÀB€f¬XR-BQ-LIST*€D€B€;ƒ€LET€D€B€hD€B€hB€^D€B€hD€B€;Ã€APPLY€D€B€;D€FUNCTIONƒ€AREFB€`B€_B€c1€D€B€?Ã‚*READER-CIRCULARITIES*B€Fì™An association list that keeps track of #n= and #n# business. The car ofeach element is a unique positive integer n; the cdr is the object that itrefers to. There is also an entry for UNIQUE-IDENTIFIER.1€D€B€?„*PLACEHOLDER-FOR-#N#-IDENTIFIER*D€B€UD€B€;ƒPLACEHOLDER€B€F1€D€pÀl€NCì‚PUT-GLOBAL-DECLARATIOND€B€;Ã€TOKEN€D€B€;ƒ‚DEFSTRUCT-DESCRIPTORD€B€;$€€B€Fp€B€+ì€ART-Q€E€F€B€FB€FB€FF€B€CMAKE-TOKENB€FB€FD€B€D€CCHARACTERSD€CMAKE-ARRAYF€Èp€B€ lADJUSTABLEB€-p€B€ ¬FILL-POINTERB€-D€CATTRIBUTESD€B€œF€ÈB€ŸB€-B€¡B€-D€C‚CONTAINS-DECIMAL-PD€B€;CUNDEFINED€D€ƒCONTAINS-NUMBER-MARKER-PB€ªD€‚SCRATCH-POINTER€€1€D€ƒ€SETQpÀ¬€SETF,ƒ*GRODY-SETF-MACRO-TABLE*D€p€B€+¬€CONSD€B€;D€Ã‚TOKEN-SCRATCH-POINTER€Ã€LAMBDAD€B€D€ƒ€LET*D€D€pÀB€¶,‚SINGLE-TEMPVARS€D€p€B€+ì€MAPCARD€B€xD€B€¼D€Ã€IGNORED€p€B€+,GENTEMP€D€B€;D€B€D€pÀB€¶,STOREVARD€p€B€+ì€GENSYMD€pÀB€¶,TEMPVARSB€ÀD€Ã€VALUESB€ÕD€p€B€+¬€LISTB€D€B€ÚB€ÏD€B€tD€D€ƒINDICES3709€B€ÏD€B€D€p€B€+¬€NTH€€B€ÕD€B€hD€B€;ÃSTRUCTURE-SET€D€B€;D€B€;B€F€B€B€ÝD€B€sD€B€;B€»B€ÕD€C€IFD€p€B€+ì€BOUNDPD€B€;B€¸B€¸B€FB€»1€D€pÀB€,‚DEF-DECLARATION€B€»Ã€SUBST€D€B€;D€pÀB€¬NAMED-LAMBDAB€»D€B€D€ÃSTRUCTURE-REF€D€B€;B€F€B€1€D€B€µB€¸D€B€ºD€B€;D€ÃƒTOKEN-CONTAINS-NUMBER-MARKER-PB€¼D€B€D€B€¾D€D€B€ÀD€B€ÂB€ÉD€B€;D€B€B€ÓD€B€ÕB€ÀD€B€ØB€ÕD€B€ÚB€B€ÜD€B€tD€D€ƒINDICES3708€B€ÏD€B€D€B€à€B€ÕD€B€hB€æD€B€;D€B€;B€F€B€B€D€B€sD€B€;B€ B€ÕB€÷B€ 1€D€B€üB€ B€ýD€B€;D€B€ÿB€ D€B€D€B€D€B€;B€F€B€1€D€B€µB€¸D€B€ºD€B€;D€ƒTOKEN-CONTAINS-DECIMAL-PB€¼D€B€D€B€¾D€D€B€ÀD€B€ÂB€ÉD€B€;D€B€B€ÓD€B€ÕB€ÀD€B€ØB€ÕD€B€ÚB€B€ÜD€B€tD€D€ƒINDICES3707€B€ÏD€B€D€B€à€B€ÕD€B€hB€æD€B€;D€B€;B€F€B€B€7D€B€sD€B€;B€.B€ÕB€÷B€.1€D€B€üB€.B€ýD€B€;D€B€ÿB€.D€B€D€B€D€B€;B€F€B€1€D€B€µB€¸D€B€ºD€B€;D€‚TOKEN-ATTRIBUTESB€¼D€B€D€B€¾D€D€B€ÀD€B€ÂB€ÉD€B€;D€B€B€ÓD€B€ÕB€ÀD€B€ØB€ÕD€B€ÚB€B€ÜD€B€tD€D€ƒINDICES3706€B€ÏD€B€D€B€à€B€ÕD€B€hB€æD€B€;D€B€;B€F€B€B€\D€B€sD€B€;B€SB€ÕB€÷B€S1€D€B€üB€SB€ýD€B€;D€B€ÿB€SD€B€D€B€D€B€;B€F€B€1€D€B€µB€¸D€B€ºD€B€;D€‚TOKEN-CHARACTERSB€¼D€B€D€B€¾D€D€B€ÀD€B€ÂB€ÉD€B€;D€B€B€ÓD€B€ÕB€ÀD€B€ØB€ÕD€B€ÚB€B€ÜD€B€tD€D€ƒINDICES3705€B€ÏD€B€D€B€à€B€ÕD€B€hB€æD€B€;D€B€;B€F€B€B€D€B€sD€B€;B€xB€ÕB€÷B€x1€D€B€üB€xB€ýD€B€;D€B€ÿB€xD€B€D€B€D€B€;B€F€B€1€D€B€D€B€;B€D€B€;ÃTYPE-EXPANDER€D€B€xD€B€¼B€FD€B€;D€CSATISFIES€TOKEN-P€B€1€D€B€üB€¡B€ýD€B€;D€B€ÿB€¡D€Ã€THING€D€‚TYPEP-STRUCTURE€B€¨D€B€;B€B€1€D€B€\CBACKQUOTE€D€CEXPRESSIONƒ&ENVIRONMENTƒ€ENV€D€ƒ€CONDD€D€VECTORP€B€²D€B€sD€B€;Ã€VECTORD€NBUTLASTD€Ã‚EXPAND-BACKQUOTED-LISTD€Ã€COERCEB€²D€B€;ƒ€LISTD€D€ƒ€NOT€D€Ã€LISTP€B€²D€B€hD€B€;B€;B€²D€D€C€EQD€ƒ€CAR€B€²D€B€;UNQUOTE€D€ƒ€CADRB€²D€D€C€ORD€B€ÌD€B€ÍB€²D€B€;‚UNQUOTE-SPLICINGD€B€ÌD€B€ÍB€²D€B€;ƒƒDESTRUCTIVE-UNQUOTE-SPLICINGD€Ã€ERROR€¬†Can't unquote-splicing immediately after backquote.€D€D€B€ÌD€B€ÍB€²D€B€;B€±D€B€hD€B€;B€±D€ƒMACROEXPAND€B€²B€´D€B€-D€B€sD€B€;Ã€LIST*€D€B€¼B€²€€