hưs8p,FALCONF2Dp,COMPILE-DATADJIMMaurice RavelS0F~FDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITEpB LMIpB SOURCE-FILE-GENERIC-PATHNAME1DplFSMAKE-FASLOAD-PATHNAMEDpB+QUOTElJBDB:DSKDB:JIMDB:QRANDDB:pB lUNSPECIFICDB:BDpB QFASL-SOURCE-FILE-UNIQUE-ID1DB8DB:B;DB:DSKDB:JIMDB:QRANDDB:LISPDB:FpB lREADTABLEpB lZLpB BASEFpB lCOLD-LOADpB lTpB ,PACKAGEpB ,SYSTEM-INTERNALS9hn@(j @jDÀIGNORE<=FFpLISP-INTERNALSlCONS-REST>FFOxBh1DPROCLAIMDB:DSPECIALAREA-FOR-PROPERTY-LISTS1DDEFVAR-INTERNALDB:B{DB:DB:CPROPERTY-LIST-AREADB:,Area for consing property lists of interned symbols in.9 C@@@A@A!G C@A@B@@@A @A C@@@A@A EAF C@@@A@A!G C@A @B@@@A @A!GjE @AFÀPLISTFFFF$DCORÀSYMBOLDBINSTANCENAMED-STRUCTURELISTLOCATIVEF"ÀOBJECTF!CETYPECASEFpB PROPERTY-LISTOB9 C@@@A@A A"B@A C@A@B@@@A @A C@@@A@A A"B@A jA @@B@A"DSETPLISTFFFFDBBDBBBFBFBFpB lSET-PROPERTY-LISTOB9 C@@@A@A!G C@@@A @A C@A @B@@@A@AAF C@A@B@@@A @A C@@@A @A EAFjE @AFÁPLIST-LOCATIONFFFF$DBBDBCONSBDBBBF"COBJECT-WITH-PROPERTY-LISTF!BFpB PROPERTY-LIST-LOCATIONFDLOCFDBB7OAB9j$@  E"@%FGETFFFFOSBB9j$@ `@@~B@F#C@@E"@%FGETFFFFFOeBT9`@@~B@F#C@@E#FÁGET-PROPERTIES<=FFGET-PROPERTIES-INTERNALF>FFOtBf9 A" B$@@@A @A@A$C%C$@`AFjDBkFFOBk C@@@A @A C@@@A @A C@A @B@@@A*@Ah@@@B A% B&@@@A@A&A"B@C)@A C@@@A!@A! C"@A  &@&A$A"@&CAB@B@CA@A C@A@B@@@A 5@A C@@@A:@A A"@$BA@A jA @@B@A"DPUTPROPFFFF>DBDBBB2BDBBBF<SYMBOL-OR-PLISTF;BF6pB ,PUTPROPFINHIBIT-SCHEDULING-FLAGOB  C@@@A @A C@@@A @A C@A @B@@@A*@Ah@@@B A$ B(@@@A@A(A"B@C)@A C@@@A!@A C"@A  (@(A$A"@(CAB@B@CB@A C@A@B@@@A 5@A C@@@A;@A A"@$@&BB@A jA @@B@A"DPUTPROP-IN-AREAFFFF?DBDBBB2BDBBBF=BF<BF6pB ,PUTPROP-IN-AREAFBO?B C@@@A @A C@@@A @A C@A @B@@@A*@Ah@@@B A# B&@@@A@A&A$B@C)@A C@@@A!@A! C"@A  &@&A"A$@&CAB@B@CA@A C@A@B@@@A 5@A C@@@A:@A A$@"BA@A jA @@B@A$DSETPROPFFFF>DBDBBB2BDBBBF<BF;BF6BFBOB@  C@@@A @A C@@@A @A C@A @B@@@A*@Ah@@@B A" B(@@@A@A(A$B@C)@A C@@@A!@A C"@A  (@(A"A$@(CAB@B@CB@A C@A@B@@@A 5@A C@@@A;@A A$@"@&BB@A jA @@B@A$DSETPROP-IN-AREAFFFF?DBDBBB2BDBBBF=BF<BF6B<FBOB9!C"@@@A @A"$@% C@A$C& "B @A @ B"@@@A@A"&@& C@A&C% "B@A A B"@@@A"@A"&@& C@A&C$ "B%@A @ B"@@@A,@A@B,@A (A*@,B@A(DDpB ,PROPERTYDEFPROPÂSPECIAL-FORM-BOOTSTRAPFFFF)ltoo many argumentsF(,forget the restF#,ran out of argsF",use NIL insteadFB$FB&F B$F B&O,B1DÂBOOTSTRAP-SPECIAL-FORMDB:B( C@@@A @A C@@@A @A C@A @B@@@A2@A C@@@A@A C@A  $@h@@@B% C,$(@ &C@A"B@@@A(@A(A'C@B&C@C@A|`D@A&C& CA B&@@@A @A@C@AjD C@A@B@@@A =@A C@@@AB@A A"B@A|`DjA @@B@A|`DREMPROPFFFFFDBDBBB2BDBBBFDBFCBF>pB ,REMPROPFBOB1phn@(j$@ A@B@@@A @A"E%C$CAF A@B@@@A@A"E%CAF A@B@@@A@AAF A@B@@@A'@A"E%CAF A@B@@@A1@A"E%C$CAF A@B@@@A=@A"E@A$CAB$CAF A@B@@@AF@A"E%CAF A@B@@@AX@A"&@$ Cj*@$ C,A&A(@+BA B&E(@/F A@B@@@A_@A#G A@B@@@Af@A"D A@B@@@An@AAF A@B@@@A@A$ C0A@B@@@A@A"E%C$C@CAF0A@B@@@A@AAF0A@B@@@A@A$CAF A@B@@@A@A!FÂPROPERTY-LIST-HANDLERFFFFDon't know how to ~S a plistFDpB GETpB GET-LOCATIONpB GET-LOCATION-OR-NILpB GETLBB<BpB PUSH-PROPERTYBpB PLISTB;pB PLIST-LOCATIONpB SETBpB ,SETPLISTpB ,WHICH-OPERATIONSFB7FB3F,Don't know how to ~S ~SFDB%BB/B7FB7FDSETFDBBDBARGSFDBB/FvB%FoB3FlDBADBBDBBCFgDBB5F`DB;B1FYDBB/FGB-F>BF2B<F(BFB+FDB=DBBBDBBCFB'FB)FB%OaB9 C!C"AAB@B@@@A+@A A@B@B@B@B@B@B@B@B@B@B@B@B@B@B@BAF C! C7b(@ $A(B@@@A6@AjA$@(B( C(A&B@@@A .@AjDÁWIPE-STRUCTUREFFFF)DBADSG-SAVED-VMACSTRUCTURENILF'DBADSG-AC-ZRBBF%DBADSG-AC-ABBF#DBADSG-AC-BBBF!DBADSG-AC-CBBFDBADSG-AC-DBBFDBADSG-AC-EBBFDBADSG-AC-TBBFDBADSG-AC-RBBFDBADSG-AC-QBBFDBADSG-AC-IBBFDBADSG-AC-JBBFDBADSG-AC-SBBFDBADSG-AC-KBBF DBADSG-SAVED-QLARYHBBF lAttempted to run wiped stack-groupF BFDTP-STACK-GROUPOBb9 E"@`@kFÁ%SXHASH-STRING<=FFC%SXHASH-SUBSTRINGF>FFOBj"@ C@@@A @A C@E`@kF C@@@A@A E`@kF C@@@A @A C@@@A$@A C@@@A"@A B@EcF!F C@@@A@Ar$@`&@j(@f *@ * C+ C$AxB$A@B@@@A7@A:@A $A@ B(C@@@AD@A(C@A`@jBY@A (C@@@AM@A(A`@jBY@A (C@@@A U@A(C@@@AX@A( BY@A ( C,A$B@A%B,A$AAB@B@B@A' B*C@@@A,@A*@@@A@A+ C$ArB@@@Aw@A$A@ By@A $ArB.A,B@A-B.A,AAB@B@B@A' B&@@&B@@@A@A&AcB@A &@AF C@@@A@A @bB@A @cB@B@E!BAF C@A@B@@@A@A AjBj@@@@@A@A@D C@@@A@A!B@B@@@A@Aj@@ @kF C@@@A@A C@B@A@B@A B@A AABABAB@ B C@@@A@A(AcB@A (@AF C@@@A@A!G`DÀSXHASHSYMBOL-NAMEFF:BFF9B`FF2BoFF/BFF-BFF,BFF$B#FF#BeFF!BUFFBeFFBXFFBFFBFFBFF BFF BFFBFFBF>FFFFFF%%Q-POINTERFBFpB SXHASHFB7FBFBOB9j"@ C@A@B@@@A @A @A  A@BbA@B@A B@AAB@B@@@A@A@B@A!B%@A @B@A @@BAB@B@@@A*@AjD@B@A @@BAB"C@@@A6@AjD@B@E @#FCGET-MACRO-ARG-DESC-POINTERFFF F6DTP-LISTF.%FEFHI-MISCF*%%FEFHI-MS-ARG-DESC-ORGF"Â%FEFHI-STORAGE-LENGTHFÁ%%FEFSL-NO-ADLFÁ%%FEFH-NO-ADLF%HEADER-TYPE-FEFF%%HEADER-TYPE-FIELDF CCOMPILED-FUNCTIONF FEF-POINTERO_Bh@@@B C@A@B@@@A @A@A  A@B@B@A @@B@B@AAB@B@@@AzAA@B@A @@BAB@B@A @@B@ B@B@A @@BA B@B@A @@B@ B@B@A @@BA B@B@A @@B@ B@B@A @@BA B AAB@ B"C@@@A@A$C@@@A@A&AbB@@@A@A@B@A0B@@@A @A@B@A0B@@@A @A@B@A0B@@@A @A@B@A0B@@@A @A@B@A0B@@@A@A@C@AjD*A,B@@@A@A.C@@@A@A*AdA?ABABaB@B@@@A @Aj@@*AAB @AB@B(AAB @AB@B@B@AAB @AB@B@C@A.C@@@A@A*AdA?ABABaB@B@@@A @A,AdA?ABABaB@B@@@A @Aj@@*AAB @AB@B,AAB @AB@B(AAB @AB@B@B@AAB @AB@B@C@A*A,B@@@A-AA*AdA?ABABaB@B@@@A -AA.AdA?ABABaB@B@@@A -AAj@@*AAB @AB@B.AAB @AB@B(AAB @AB@B@B@AAB @AB@B@C@A*AdA?ABABaB@B@@@A wAA,AdA?ABABaB@B@@@A wAA.AdA?ABABaB@B@@@A wAAj@@*AAB @AB@B,AAB @AB@B.AAB @AB@B(AAB @AB@B@B@AAB @AB@B@C@A@C@AjD@C@AjDÂMAYBE-CHANGE-FEF-TYPEFFIBFFHBRFFGBFF?BFF>BFF=BRFF<BFF4BFF3BFF2BRFF1BFF*BF)BFF(BFF%BFF"BFF BFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBRFFBFFBFFBFFBRFFBFFB'FFBFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBRFFBFFBFFBFFBRFFBFFBFFBFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBRFFBFFBFFB'FFBF~BIT-TESTFF|BFFwBSFFuBFFpBSFFnBFFiBSFFgBFFbBSFF`BFF[B'FFVBFFRBFFQC%P-CONTENTS-OFFSETFFPBFFMBFFLBFFHBFFFBFFEBFFABFF?BFF>BFF:BFF8BFF7BFF3BFF1BFF0BFF,BFF*BFF)BFF%BFF#BFF"BFFBFFB'FFBFFBFFBFFBFFB>FFBFFBFFBF>FFFJFvCVARIABLE-ARGS-WITH-LOCALSFqC%FEFHI-IPCFnBYFkC%HEADER-TYPE-FAST-FEF-VAR-ARGS-WITH-LOCALSFhBQFeBSFaBF^Â%%FEFH-LOCALS-FOR-VAWLFZBFW%%FEFH-MAX-ARGS-FOR-VAWLFSBFP%%FEFH-MIN-ARGS-FOR-VAWLFFBF;BF0BF,ÂFIXED-ARGS-WITH-LOCALSF'BF$BYF!%HEADER-TYPE-FAST-FEF-FIXED-ARGS-WITH-LOCALSFBQFBSFBFÂ%%FEFH-LOCALS-FOR-FAWLFBF %%FEFH-ARGS-FOR-FAWLFBFBFVARIABLE-ARGS-NO-LOCALSFBFBYF%HEADER-TYPE-FAST-FEF-VAR-ARGS-NO-LOCALSFBQFBSFBF%%FEFH-MAX-ARGS-FOR-VANLFBF%%FEFH-MIN-ARGS-FOR-VANLFBFBFFIXED-ARGS-NO-LOCALSFBFBYFC%HEADER-TYPE-FAST-FEF-FIXED-ARGS-NO-LOCALSFBQFBSFBF%%FEFH-ARGS-FOR-FANLFBF{%ARG-DESC-FEF-BIND-HAIRFt%ARG-DESC-FEF-QUOTE-HAIRFmÂ%ARG-DESC-INTERPRETEDFfÂ%ARG-DESC-EVALED-RESTF_Â%ARG-DESC-QUOTED-RESTFO%FEFHI-FAST-ARG-OPTFKBMFGÃ%%FEFHI-MS-LOCAL-BLOCK-LENGTHFDBF@%%ARG-DESC-MAX-ARGSF=BF9%%ARG-DESC-MIN-ARGSF6BF2BUF/BF+%%FEFH-FAST-ARGF(BF$Á%%FEFH-SV-BINDF!BFÃ%%FEFH-GET-SELF-MAPPING-TABLEFBWFBFBYF B[F B]FC%INHIBIT-READ-ONLYOB`9` @`"@@ B/@A `&@$ C) C)@A (A&B@C@@@A(@A(A& B,C@@@A@A,C@C@A@Bj@@@@@A'@A,C@C@@@A%@A#C"@@ C @@j@@' C&A*B@@@A @A$ C$@@@A @AhE @#FCMAYBE-CHANGE-FEF-TYPE-ALLFFF3~%~D total functions, ~D fast.FÁ*ALL-PACKAGES*OhB1DCDEFCONST-1ARRAY-ELEMENT-TYPE-ALISTDB:DDBCART-ERRORDBITÀART-1BDDMODFÀART-2BDDBpFÀART-4BDDBpFÀART-8BDDBpART-16BDÀFIXNUMART-32BDB-ÀART-QDB-CART-Q-LISTDSTRING-CHARCART-STRINGDB-ART-STACK-GROUP-HEADDB-ART-SPECIAL-PDLDDSIGNED-BYTEFART-HALF-FIXDB-ART-REG-PDLDÀFLOATCART-FLOATDBÁART-FPS-FLOATDFAT-CHARÁART-FAT-STRINGDDCOMPLEXBCART-COMPLEX-FLOATDBART-COMPLEXDDBBÂART-COMPLEX-FPS-FLOATDDÁUNSIGNED-BYTEFBnDDBFBsDDBFBwDDBFB{DDBFBDDBFB1DBiARRAY-ELEMENT-SIZE-ALISTDB:DDFBnDFBsDFBwDFB{DB9j"@ AAB@B@@@A @A D AABAB"@@@@@A@A"EABAF C@@@A*@A@B@A B@C@@@A &@A@B@A B&@A  EABAF!GARRAY-CANONICALIZE-TYPEFFFF'ARRAY-TYPESF!C%%ARRAY-TYPE-FIELDFB FB F ARRAY-TYPE-KEYWORDSFB O B9 C@AAB@B@C@@@A  @AhD@DCARRAY-ELEMENT-TYPEFFFFBjO& B 9 C@@@A@A @A  A@B@AhDCADJUSTABLE-ARRAY-PFBOF>FFFFÀARRAYFB: O= B' 9 C@A@BAGARRAY-TYPE-NULL-ELEMENT<=FFBFFASSQFBF>FFFFDDBkDBnDBsDBwDB{DBDBDBDBDB%DBDBDBDBDBǀDBǀDBB_ DB5ǀǀDBDB5ǀǀOw B> 1DByDB:DBzB 1DBDB:B DB:BDB:List of keywords which have pnames matching the array type symbols.1DBiÂARRAY-TOTAL-SIZE-LIMITD%LOGDPBC%%Q-BOXED-SIGN-BITFlThe total number of elements in any array must be less than this.1DBiÂARRAY-DIMENSION-LIMITDB B FEvery dimension of an array must be less than this.1DBiARRAY-RANK-LIMITFThe rank of an array must be less than this.9aFÂINVALIDATE-ARRAY-CACHE<=FFAR-1F>FFINVAO B 9j"@ C@ApB@@@A  @A C@ApB@@@A@A Af@fB C! C%B@BAC&@@B&@AB@BAFÂARRAY-TOTAL-DATA-SIZEFFFFF F!DDC-CELEMENTS-PER-WORDFC*FDB FCEILINGFDÀPLUSPB FCIFFDFUNCTIONARRAY-ELEMENTS-PER-QFAREFFB FLETDÀMACROB O B 9j"@ C@ApB@@@A  @A C@ApB@@@A@A Af@fB C! C%B@BAC&@@B&@AB@BAFCARRAY-ELEMENTS-FOR-GIVEN-DATA-SIZEFFFFF F!DDB B FB FDB FB FDB B FB FDB B FB FB FB DB B; O< B 9j"@ C@ApB@@@A  @A C@ApB@@@A@A Af@fB C! C&@$BAFÂARRAY-BOXED-DATA-SIZEFFFFFFDB ÃARRAY-BOXED-WORDS-PER-ELEMENTFB FB DB Bg Oh B= hn@(B a`@j@@@B` a@A@`a@A@@@C@B` a@Aj@@@B` a@Aj@@@B` a@Aj@@@ B` a@Aj@@@ B` a@Aj@@@ B` a@Aj@@@~B@` a@Aj@@@|B@` a@Aj@@@zB@` a@Aj@@@xB@` a@Aj@@@vB@` a@Aj@@@tB@` a@Aj@@@a@A@B@pB@` a@Aj@@@Pa@Aj@@@a@Aj"@j$@j&@j(@j*@j,@j.@j0@@`a@A@@@C@@@Al@Aq@A @`a@AB@`a@A2@ 2 C2C@A@B@@@A@A4@@@zB@` a@AAA 2C@A@B@@@A@A4@@@pB@` a@Ah@@@Pa@AAA 2C@A@B@@@A@A4C@pB@` a@Ah@@@a@AAA 2C@A@B@@@A@A4@@@|B@` a@AAA 2C@A@B@@@A@A4@@@~B@` a@AAA 2C@A@B@@@A@A4"@h$@ 2C@A@B@@@A@A4&@h(@ 2C@A@B@@@A@A4@@@ B` a@AAA 2C@A@B@@@A@AAA 2C@A@B@@@A@A4@@@B` a@AAA 2C@A@B@@@AAA4@@@B` a@AAA 2C@A@B@@@A AA4@@@ B` a@AAA 3C@B3 C2@@@A u@APa@A@@@A%AAa@A@@@A%AAj@@@B%AA |@@`a@A@@@A7AA~@@`a@A@@@A 7AAj@@@B7AA $@@@ACAA(@@@ACAAj@@@BCAA p@@`a@A@@@C@@@AcAA@B@Ap@@`a@AB@C@@@AWAAbAA @B@Ap@@`a@AB@pB@` a@AAA p@@`a@A@@@C@@@AAAp@@`a@A@@@AAB@B@@@AAA@B@Ap@@`a@A@@AC@B@pB@` a@AAA p@@`a@A@@@AAB@B@@@AAAp@@`a@A@@@AAB@B@pB@` a@AAA p@@`a@ABAA p@@`a@AB C@@@AAA C@@@A AAj@@b@@@vB@` a@A @@@tB@` a@AAA C@@@AAA C@vB@` a@A@AAB@B@@@AAAABv@@`a@AB 6@j8@ 6C8C@@@AAA8C@@@A AAj@@ 8A@B7 C6@@@A AA@A4 B@tB@` a@At@@`a@A@@@C@@@AAAAA  @t@@`a@ABAA  B~@@`a@A@@@A BA~@@`a@A@@@C@@@A  BA~@@`a@A@@@C@@@A  BA~@@`a@A@@@C@A @B@@@A!BA-BA ~@@`a@A@@@A@B@~B@` a@A|@@`a@A@@@ADBA|@@`a@A@@@C@@@AEBA|@@`a@A@@@C@@@A EBAj@@QBA |@@`a@A@@@A@B@|B@` a@A@`a@A@@@A ]BA`@@@B` a@AsBA @`a@A@@@C@@@AnBA@`a@A@@@C@@@A nBAsj@@ @`a@AB@`a@A@@@A zBABA @`a@A@@@C@@@ABA@`a@A@@@A@`a@A@@AC@B@B` a@ABA @`a@AB @`a@A@@@A BABA @`a@A@@@C@@@ABA @`a@A@@@AhB@@@A BA@`a@A@@@ABA@`a@A@@@C@@@ABAj@@@`a@A@@@AfB@B` a@ABA v@@`a@A@@@AbB@@@A BA@BBA  @`a@AB @`a@A@@@A BA)CA @`a@A@@@C@@@ABA @`a@A@@@C@@@A BABA j@@ @`a@A@@@AhB@@@A$CAj@@v@@`a@A@@@AbB@@@ACA CA @B@`a@A@@@AbB@B` a@A @`a@A@@@C@@@A #CAt@@`a@A@@@ B` a@A)CA  @`a@AB@`a@A@@@C@@@AGCA`@@@ B` a@Av@@`a@A@@@AABp@@`a@A@@@AAB`B@ BdCA fA@`a@AB@ B` a@AbAABv@@`a@A@@@AABp@@`a@A@@@AAB`B@B@ B~@@`a@A@@@A CAt@@`a@A@@@AAB@B@a@A@@@A CAt@@`a@A@@@A0 BbAv@@`a@A BCA bAAB0 BbAv@@`a@ABA C0At@@`a@A@@`a@A@z@@`a@A@ @`a@A@@@A.B@A@A4p@@`a@AB:C@@@ACAt@@`a@A@@@A;BCA t@@`a@A@@@A;CAB@ B,@ @`a@A@@@A.B@At@@`a@A@@@A@A4p@@`a@ABABA B* B@xB@` a@A@DA bAAB0B@A|@@`a@A@@@ACAp@ f@@B@At@@`a@A@@`a@A@z@@`a@A@ @`a@A@@@AbAv@@`a@AB@B@A|@@`a@A@@@ADAp@ f@@ B,@,*@* B@xB@` a@A~@@`a@A@@@Ax@@`a@A@v@@`a@ABt@@`a@A@@@Ax@@`a@A@v@@`a@A@@@C@B|@@`a@A@@@A 0DA@DA |@@`a@A@@@Ax@@`a@A@v@@`a@A@@@AfB@Bv@@`a@A@@@AbB@@@AlDAj8@! Ca@A@@@ATDAv@@`a@AY<@ v@@`a@A@@@C6@@@AkDA6C7 C8Ax@@`a@A@<B6@@@AkDA6C7 C<C^DA j@@@`a@A@@@ADAj>@@`a@A6@`<@6@@@ADA7C7 C@B6@@@ADA7C7 C<C}DA j@@ @`a@A@@@ADAx@@`a@A@@@A @`a@AB @`a@A@@@ADA@`a@A@@@C@@@ADA@BDA @`a@A@@@AhB@@@ADADA @BbAABx@@`a@A@`B"@@@ADA~@@`a@A@@@A DAj@@x@@`a@A@@@A"B(@@@ADAx@@`a@A@@@A&@`@`B @`a@A@@@A DA@`a@A@@@A6EAv@@`a@A@@@AbB@@@A6EAp@@`a@A@@@AzB@@@A6EAj@@ @`a@A@@@ADAEA @`a@A@@@C@ B` a@A @`a@A@@@C@@@A EA @`a@A@@@C@@@A EA @`a@A@@@Ax@@`a@A@@AC@Bj@@@@@A5EA@B@AABx@@`a@A@@@A @`a@A@@AC@B@Bj@@x@A`a@A@,@*@`@BB` a`@|`DCMAKE-ARRAYBFF(BuFF'BrFFBuFF%MAKE-ARRAYFFBFFBFF*MAXFFBFFB FFBFFB FFBFFÀ*TIMESFFB FFBb FBFFBFFB FFÀMINUSFFB FFB FFB FFB FBFFBrFFB FFB FFBFFB FF}BFFqBFFpBFFcB FFbB FFaB FF`BFFYBFFRBFFKBFFEB FFDB FFCBFF<BFF-BFF(BFFBFFB FFBFFB'FFBFFBXFFBFFBFFBFFB'FFB FFB FFBFFBFFBFFB FFBLFF~B#FFrBFFiBXFFaBFFLB>FF?BXFF7BFF(B>FFBFFBFFBOFF BFFBFFBFFBFFÀAPPLYFFB FBFFB>FFBXFFBFFBFFBFFBFFBFFBFFBLFFBFFBXFFBFFBFFBFFBFFBFFBFFBFF~%LOGLDBFF}SYMBOL-VALUEFFwBFFrBFFqBFFgBFF]B FFXBFFRBFFQB FFLBFFGBFFABFF5BFF#BFFBZFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFyBFFvBFFuBFFpBFFgÀEVENPFFNBFF BLFFBo>FFF@F'%%Q-CDR-CODEF$CDR-NILF%%ARRAY-NAMED-STRUCTURE-FLAGFDBADARRAY-LEADERB: FÂNAMED-STRUCTURE-SYMBOLFDBADB B: B F}DBADB B: ÀINDEXELEMENTFÂ%%ARRAY-DISPLACED-BITF%%ARRAY-LONG-LENGTH-FLAGFoÃ%ARRAY-MAX-SHORT-INDEX-LENGTHF_B FXC%%ARRAY-NUMBER-DIMENSIONSFQC%%ARRAY-LEADER-BITFBB F;B+ F$,~S is not a valid fill-pointer.FlOnly 1-dimensional arrays may have fill-pointers.Fl~S is not a valid named-structure symbol.F,Named-structure arrays without leaders must be one-dimensional.F~S is not a valid leader-list.Fn~S is not a valid leader-length specification.FKDBNULLDBFJÂDISPLACED-INDEX-OFFSETF'DBB= BB: BF&DISPLACED-TOF,~S is not a valid array dimension specification.F,Array too large; dimensions ~D ==> total size ~DFDBFCDIMENSIONFB FArrays may have at most ~D dimensions, not ~D.FB F~S is not a valid array type.F~S is not a valid array type.FB FB FvB FpB FWB FKB F@pB ,INITIAL-CONTENTSF?pB ,INITIAL-ELEMENTF>lBoth ~S and ~S specified.F4pB DISPLACED-TOF3pB DISPLACED-INDEX-OFFSETF2The ~S option specified without ~S.F"pB ELEMENT-TYPEF!pB TYPEF lBoth ~S and ~S specified.FBi F ~S is not a known ~S keyword.FpB NAMED-STRUCTURE-SYMBOLFpB LEADER-LENGTHFpB LEADER-LISTFpB lADJUSTABLEFpB FILL-POINTERFB` FDBc pB INITIAL-VALUEFBh FBk FBp FBs FxpB AREAFlOdd-length options list: ~SFMBO Bi 9 C@@@A @A!F C@@@A  @A!F"C@@@A @AAF"C@@@A @A"A!C@B@@@A@A"@!FAFSET-FILL-POINTERFFFFDBADB B: ÀVALUEFNew fill pointer ~A out of range for array ~AFlNew fill-pointer must be a fixnumF Array ~S has no fill-pointerFArgument ~S must be an arrayO B 9hn@(j"@j$@j&@j(@j*@j,@j.@j0@"@@@A@A"AjBxA$ B`@'@b@)@d@+@f@-@h@/@j@1@$@@.@@@A @A.C@@@A!@A%@A .AA B@A4 @"B@A@DpBlMAKE-ARRAYFFBOFFpBm,MVBIND-NFFpBmGET-KEYWORD-ARG-VALUESFFBo>FFFF#DBB= B: F"BF FDBp Bc B` B B Bh Bk O B hn@(B a`@j@@@B` a@A@`a@A@@@C@B` a@Aj@@@B` a@Aj@@@ B` a@Aj@@@ B` a@Aj@@@ B` a@Aj@@@~B@` a@Aj@@@|B@` a@Aj@@@zB@` a@Aj@@@xB@` a@Aj@@@vB@` a@Aj@@@tB@` a@Aj@@@a@A@B@pB@` a@Aj@@@Pa@Aj@@@a@Aj"@j$@j&@j(@j*@j,@j.@j0@j2@j4@@`a@A@@@C@@@Ai@An@A @`a@AB@`a@A6@ 6C6C@A@B@@@A@A8@@@xB@` a@AAA 6C@A@B@@@A@A8@@@pB@` a@Ah@@@Pa@AAA 6C@A@B@@@A@A8C@pB@` a@Ah@@@a@AAA 6C@A@B@@@A@A8@@@zB@` a@AAA 6C@A@B@@@A@A8@@@|B@` a@AAA 6C@A@B@@@A@A8"@h$@ 6C@A@B@@@A@A8&@h(@ 6C@A@B@@@A@A8@@@ B` a@AAA 6C@A@B@@@A@AAA 6C@A@B@@@A@A84@ 6C@A@B@@@A@A8@@@B` a@AAA 6C@A@B@@@AAA8@@@ B` a@AAA 6C@A@B@@@AAA8@@@~B@` a@AAA 7C@B7 C6@@@A r@APa@A@@@A*AAa@A@@@A*AAj@@@B*AA z@@`a@A@@@AC@@@AACAt@@`a@A@@@A> BHCA t@@`a@A@@@A?C@ Bt@@`a@A@@@A@A4p@@`a@ABA Bt@@`a@A@@@AAB@B@a@A@@@A hCAbAv@@`a@A BnCA bAv@@`a@ABA C @`a@A@@@A2B@A+ B @`a@A@@@A2B@A, BCA |@@`a@A@@@A CA@A4p@@`a@AB>C@@@ACAt@@`a@A@@@A> BCA t@@`a@A@@@A?C@ Bt@@`a@A@@@A@A4p@@`a@ABA Bt@@`a@A@@@AAB@B@a@A@@@A CAbAv@@`a@A BCA bAv@@`a@ABA C @`a@A@@@A2B@A+ B @`a@A@@@A2B@A, BCA z@@`a@A@@@ACAp*@ f*@ @`a@A@@@AbAv@@`a@AB@B@A* B0.@0A.@`@BB` a`@|`DCARRAY-SIZE-IF-MADEFHF;F<F5F<F/F<F)F*F#F*FF*FFrFFF FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFyFFqFFhFnFgFi=FFB|FFBFFBFFB FFBFFBFFBFFBFFBrFFB FFB FFBFFBFFB FFB FFBb FB FFB FFB FFB FFB FFB F}BFF{BFFuBFFsBFFmBrFFlB FFfB FF[BFFZBFFSB FFRB FFNBb FGB FFFB FF?B FF6B FF5B FF1B F(BFFBFFBFF B FFBFFB'FFBXFFBFFBFFBFFB'FFB FFB FFBFFBFFBFFB FFBLFFB#FFzBFFqBXFFiBFFTB>FFGBXFF?BFF0B>FF$BFF!BFFBOFFBFFBFFBFFBFFBy FFB FBFFB>FFBXFFBFFBFFBFFB FFBFFBoFFBFFBLFFBFFBXFFBFFBFFBFFBFFBFFBFFBFFB FFB FF|BFFwBFFvBFFlBFFbB FF]BFFWBFFVB FFQBFFLBFFFBFF:BFF(BFFBZFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFBFFvBFFsBFFrBFFmBFFdB FFIBFF BLFFBo>FFF6FB( FYB( F,~S is not a valid fill-pointer.FlOnly 1-dimensional arrays may have fill-pointers.Fl~S is not a valid named-structure symbol.F,Named-structure arrays without leaders must be one-dimensional.F~S is not a valid leader-list.Fv~S is not a valid leader-length specification.FSDBB= DBFRBB F/DBB= BB: BF.BF F,~S is not a valid array dimension specification.F,Array too large; dimensions ~S ==> total size ~SFa non-negative fixnumFDBFBO FB FArrays may have at most ~S dimensions, not ~S.FB F~S is not a valid array type.F~S is not a valid array type.FB FB F{B FuB F\B FPB FEB` FDBc FClBoth ~S and ~S specified.F9Bh F8Bk F7The ~S option specified without ~S.F'Bp F&Bs F%lBoth ~S and ~S specified.FBi F~S is not a known ~S keyword.FB{ FB~ FB FpB ,WIREABLEFB FB FB` FDBc B FBh FBk FBp FBs FuB FiOdd-length options list: ~SFHBO`B Thn@(pB@ a`@j@@@pB@` a@Aj@@@Pa@A@B@a@A@ Bj&@j(@j*@j,@j.@p@@`a@A@@@A/@Ap@@`a@A@@@AjB@C`@A@@a@Ab@%@d@'@f@)@h@+@a@A@@@AAB@B@@@A:@A>j0@ h,@a@A0@$AAB@B@@@AF@AHj2@ h.@$2@ C@@@AM@AQ@A  A@B"C@@@Ae@A"C@@@A e@Aj@@ C@AbB@@@Aa@Ac@A  B#C@A "C@@@A@A C@A#C@B@@@Aq@At@A #C B"4@j6@ 5 C6C@@@A@A6C@@@A @Aj@@ 6AA B4 C4@@@A v@A@A "B*@@@A@A(@@@A @Aj@@ C@@@A@A Cp@@`a@A@@@A)B@B@pB@` a@A@A @B,@@@A@A.@@@A @Aj@@,@@@A@A(@@@A @Aj@@.@@@A@A(@@@A@Aj@@@BPa@A@@@A@APa@A@@@C@AAB@B@C8A C@AAB@BAC@B@@@A@Aj@@ Pa@A@Pa@A@@@A9B8@  C@AAB@B@C@B(@@@A\AA(:@ :A B@@@A@A:A)B B;C:@@@A @Aj@@@@@A [AA C@A)C@B@@@AAA @ C@AAB@B@C(@(C@AAB@B@C@B[AA *@@@A&AA*C@@@A"AA*C@@@A&AAj@@@B[AA *@@@@@A ,AA@A-`@ @A@A4#B@B@A)C@B@@@A;AA @(B[AA C@@@ANAA*C@A CAC@B@@@ANAAj@@ A!C"@(@*B[AA  A@A4"@!C!Cp@@`a@A B@ByAA C<A`B@@@AcAAyAA <AbB@@@AuAA!C A#C@B,@@@AtAA A0@>@#C@ByAA  A"@,@0B.@@@AAA A2@`@`BAA &@@@AAA A&AhB@@@AAA!CAA &@@BAA `B `}@pB@` a`@|`DADJUST-ARRAYFNF:F[F6F;F+F-F)F,F%F[F!F&FF"FF&FF[FFFF[FFFFFFFF\FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFvFFF~FFzFFuFFpFtFoFqFhFFdFF`FcF_FaFXFeFTFeFLFQFKFMFEFHFDFFF9F>F8F:FF/=FeFB FFB FFB FFBFFB FFxARRAY-GROW-1FFsB FFrBFFkCADJUST-ARRAY-SIZEFFjBFFhB FFdBFF^BFF\CARRAY-RANKFFZCSTRUCTURE-FORWARDFFYBy FFUB FFSCLIST-ARRAY-LEADERFFPBi FLÂCHANGE-INDIRECT-ARRAYFFIB FFCBFFBNOTFFACARRAY-INDEX-OFFSETFF?BFF;CARRAY-DISPLACED-PFF9BFF3BFF2B FF0BFF/By FF.B F$BFFBXFFBFFBFFBFFB FFBFFB FF BFF B FF BFFB FFNEQFFB FFB FFCARRAY-INDIRECT-TOFFBFFBFFBFFBFFBFFB FFBFFB FFÀEQUALFFBFFBFFB FFBFFB FFBFFB FFBFFBFFBFFBFFÀAPPENDFFB FFBNFFB FFBFFBFFB>FF{BXFFwBFFvBFFsBFFrBLFFlB'FFkBLFFiBFFeBFFcÀNCONSFFbBFF\B'FFZBFFUBXFFQBFFPB>FFHBOFFABFF@BFF5BFF4BFF&pBm,MVBIND-6FF%B FFBFFBFFBo>FFFFB FTBs FRB F7,~s would be displaced past the end of ~SF#displaced-index-offset must be a non-negative fixnumFBjF BjFl~S has element type ~S, and can't be displaced to ~S with element type ~SF,You can't ~:[indirectly~;directly~] displace array ~S to itselfFBjFB: FELEMENT-TYPEF,~S is ~S~:[ (=> ~S)~;~*~], but ~S is of element-type ~SFBjFBjFOnly one of :INITIAL-ELEMENT, :INITIAL-CONTENTS, and :DISPLACED-TO may be specifiedF:DISPLACED-INDEX-OFFSET but no :DISPLACED-TOFBh F,~S is not a valid array dimension specification.FDBFBO Fq~S is the wrong number of dimensions for ~SFal1 is the wrong number of dimensions for ~SFOB: FNB: F?KEYWORD-GARBAGEF3BF$DBp Bc B` B Bh Bk FBF BOBa Cj*@j,@"A C C & @ C@ B`.@ C@@@A @A`0@@0@ @B/ C0 C0C@@@A@A"2@*(4@ 2C@C@@@A \@A4C@C@@@A \@A3 C4 C2@@@A @A`Aj@"CA B*AdB*.@(6@O"0@ .A.CAC@B.C@A7C@B@@@AH@A.C@A1C@B@@@A K@A.A`BL@A S@A / C7 C0 C.@@@A 6@A\@A @A4@A4 @+B,@*B3@A @B@A B@AAB,B A,B`B@A,DBFFFFfB FaB F\B FDBADB CNEW-ARRAYCIDB B: ByF B~ FBc FBs FB OB9hn@(j @ C@AaB`$@  &@ @B$ C' C&@@@A @A"DÀVECTORFFFFDBADB ÀRESULTByDBTAILOB1DByDB:DBz*MAKE-LIST-CDR-CODE-DEFAULT*1DBDB:BDB:B-DB:B9hn@(j"@" Cj&@j(@A B$AbB@@@A@A &@"C6@A $C@@@A@A"B@A 3",@ - C, C0A@B@@@A!@A2.&@ 0A@B@@@A(@A2.(@ 0A@B@@@A/@A2.*@ -C@B, C,@@@A @A*@@@A<@A(E&@!F(E&@!FCMAKE-LISTMAKE-LIST-WITH-CONSFF;BGFF2BZFF1BFF0BFF*BFF#BFFBFFBFFBFFBFFODDPFFBFF B'FFBFFBLFFBo>FFFF/l~S is not a known keyword.F)pB lCDR-CODEDF"DBc B FB FOdd-length options list: ~SFBOB9j&@`(@$*@  A&@# B( C(A*B@@@A @A&DBFFOB"@A j$@ j&@ j(@ j*@j,@j.@j0@j2@j4@j6@j8@"C@@@A@A@B@A"B@C@@@A@A@A @B@A#BA@A "C@@@A?@A"AAB@B@@@A0@A@B@A#CAB>@A "AAB@B@@@A<@A"AABAB>@A "BA@A "B C@@@AJ@A C@@@A J@Abj@@ C@@@A`@A C@AbB@@@AV@A C_@A  E"@$@ & @)Fb@A  B&@@@A f@Aq`&@ &C@@@Ao@A&C@@@A o@Aqj@@ &B&C@@@A@A`2@bAAB"AAB`BA B@A fA' BbAABbAAB"AAB`B@BA B@A4#B:C@@@A@A A: B@A  A;C@ B A@A4#BA B AAB@B@@@A @A A7 Bb8@ bAAB7 Bf8@2A8B@A+ B2A8B@A, B6A @&@$@0@. B(@@@A @A@A 4A(B4E0@.@`AFBFAF;F>F6F<F/F>F)F0F"F?FFAFFFFFFFFFFFFFF=F>FB|FFB FFB FFBFFBFFBFFBFFB FFBFFBFFBFFBFFB FFB FFBb FB FFB FFB FFB FFB FFB FB FFB FFB FFBFFBFFBFFBFF}B FF|B FF{BFFxBFFqBFFpBFFjBXFFfBFFaBFF^Bi F FTBFFPB'FFNBLFFJBFFEBXFFABFF@BFF=BFF:BFF9BFF3BFF2BFF.B FF-B FF+BFF&BFF%BFFBFFB FFBFFBFFB FFBFF BF>FFFFFFFFFFFFB& FB( FB FB+ FB- FzB FwB+ Fo~S is not a valid leader-length specification.F`~S is not a valid array dimension specifier.F]Bc F[B~ FYB FWBs F?~S is not a valid array type.F<~S is not a valid array type.F8B F1B F*B F$B FB FB BOB9@A AbAAB@BAB@B@A @`@j@ C!C@B @`AFSIMPLE-MAKE-ARRAY-1D-Q-SHORT<=FFB|FFB FFBrFF BrFFBFFB FFBFFBF>FFFFBFB+ O%B0 C@@@A @A C@@@A  @Aj@@ C@@@A@A C@A jA @@B AAB@B@@@A5@AbAABbAABbAAB@B@B@B@B@A @b@j@tA AsB@Bt B@A@DbAABbAAB@B@A B@B@B@A @b@j@rA AsB@Br B@A@DÅSIMPLE-MAKE-ARRAY-1D-STRING-WITH-FILL-POINTERBFF<BFF:BFF7BFF2B FF1BFF0B FF)B FF(B FF'B FF&BFF$BFF!BFFBFFBFFBFFBFF BFF BFFBXFBF>FFF F;BF9B+ F6B- F%BF#B+ F B- FB& FB( FDBDBBFINDEX-LENGTHFBOB&9 E$@`@#FCFILL-ARRAY<=FFB F>FFOB tB@ a`@`$@ tB@ a`@j&@ tB@ a`@ @@@tB@` a@A @@@a@A`@@@pB@` a@A&@@@A @At@@`a@A@@A C&@@W@A   $A&@t@@`a@AB@B@A@B@C@Pa@A`@A@@a@APa@A@@@A@B@@@AJ@Aj@@a@AW$@ Pa@A@@@A@B@@@AW@Aj@@a@A&@`A$@&@t@@`a@A@@AC@B@@@A @At@@`a@A@@@C@C@@@Ao@A@BAA &A$AAB@B@@@A@A{$(@ @B( C(A&B@@@A x@AAA @A t@@`a@A@@@C@@@A@Ap@@`a@A@@@At@@`a@A@@AC@B@pB@` a@At@@`a@A@@@C@tB@` a@At@@`a@A@@@C@@@A @At@@`a@A@@@C@AAB@B@@@A@A@A t@@`a@A@@@C@tB@` a@Aa@A@@@C@AAB@B@@@A@A@A a@A@@@C@a@A@B@Aa@ABA C@B@Aa@AB@ C$Ap@@`a@A B&Ap@@`a@A Bt@@`a@A@@A C*C@@@A@Ab4@ * CbA+ B0A6A.A6BACAB@B.A6A0A7BABAB2A4A8A7BAB@B*C@@@AAA:A+BAA :A+CAB.(@ @B( C(A8B@@@AAA":(@ @B( C(A0B@@@A AA>A<A3B@B@C@@@AAAh@@@Bt@@`a@A@@@C@@@AGAAt@@`a@A@@@C@C@A2B@tB@` a@AGAA ,@@@AeAA@B@At@@`a@A@<A4B@B@A@B@At@@`a@A@=B>A<A3B@Bb@@B@CAA @B@At@@`a@A@<A4B@B@A@B@At@@`a@A@=B>A<A3B@Bb@@B@CAA  `}@tB@` a`@tB@` a`@tB@` a`@|`DB BNFF6B FF1BFF+B FF*B`FF)B`FF#BoFF!BrFF BFFB'FFBrFFBFFB FFB FFTRUNCATEFF B FF BFF B FFB FFB FFB FFÀFLOORFF*MINFFB FFBrFFB FFB FFB FFB FFCARRAY-DATA-OFFSETFFBFFBFFÂARRAY-BITS-PER-ELEMENTFFBFFBFFB FFBFFBFFBFFB'FFBFF%P-DATA-TYPEFFBFFB'FFBFFBZFFARRAY-INDIRECT-PFFBNFFBFFBFFBFF|BoFFzBrFFyBFFsBoFFrBFFmBFFhBFFgBFF_CFF^B FFOBFFBBFF5pBm,MVBIND-2FF4ÀSIGNALFF0ÁMAKE-CONDITIONF F/B FFBLF>FFFFFFFFpDTP-LOCATIVEFeBFUBFJBF0BFDBADCAR-1-FORCEÁORIGINAL-ARRAYDB ByÀOFFSETB FDBADBBDB ByBB FB FB FDTP-ARRAY-HEADERFBFxDBADBB: ByB FlDBADB B: B FNENDFAÀSTARTF3DBBF2pB PROCEED-TYPESF)pB FORMAT-ARGSF(lSTART is ~S and END is ~S, for ~S.F'pB FORMAT-STRINGF&DDBBDBBF%pB ,PROCEED-TYPE-PLACE-ALISTF$BF#BF"DBBF!pB PLACESF FAILED-ASSERTIONOB 9 C@E@B@A!BAFB@<=FFBFFBFFBFBF>FFFFB& OB@j"@ C@@@A@A @A  A@B Cj&@"@@@A+@A C@AAB@B@@@A +@Aj@@h@@@B$AAB@BA B A`@$@&@`@$ B& @ `}@@C:@A C@@@A :@A$AABA B A`@$@&@`@$ B& @@B@AAB @j@"@@@@@AG@A@Bj@AB@B@ Bh@@@B(C@A(B(C@AAB@B(C@A(B(C@AAB@B@C@A(DMAKE-SYMBOLBFF;BFF8CCOPY-ARRAY-PORTIONFF2BFF1BFF+ÁSIMPLE-ARRAY-PFF)BF&B1FF BFFBFFBFFBFFB'FFBFFBiFF BLFF B>FFBF>FFFFFF]DTP-NULLFUB[FNBFJLENGTH-OF-ATOM-HEADFHB_FEÀNR-SYMF=CDTP-SYMBOL-HEADERF:CDTP-SYMBOLF0BFCP-N-STRINGFBFBFBiFÀSTRINGFÀPNAMEOrB1DByDB:DBzB1DBDB:BDB:GDB:B1DCADD-INITIALIZATION,Keyword-garbageDB:DSETQBDBBpB ONCE@j(@ (@@@A@A( @ `@@@@A*@* CL`.@ ,A$ B0@@@A"@AbA.A1CAB@B@C@@@A!@AbAbA1B/ B*C@A @0B?@A &@@@A ?@A,A@B@@@A ?@A`@@~B@F#C@@AA B&@@@@@A ?@Aj@,@+C@ B,@@@A  @A*C@C@@@AJ@A`@@@@A BK@A + C* C*@@@A  @AjDSTORE-KEYWORD-ARG-VALUESF F4F?F*F?F$F?F!F?FF!FF"F FLFFFFF=FFKBFFJBZFFHBFF@ENDPFF?BFF;BFF:BFF0BBFF'BFF BuFFBFFBFFBFFBFFBRFFASHFFB FF BFF BF>FFFFFFDOdd number of keyword args: ~SF8Keyword arg keyword ~S unrecognized.F7CUNDEFINED-KEYWORD-ARGUMENTF5pB NEW-KEYWORDF/pB ,ALLOW-OTHER-KEYSF&BOB4j(@ `@@@@A*@* CI`.@ ,A$ B0@@@A@AbA.A1CAB@B@C@@@A@AbAbA1B/ B*C@A @0C@B<@A &@@@A <@A,A@B@@@A <@A`@@~B@F#C@@AA B&@@@@@A <@Aj@,@+C@ B,@@@A @A*C@C@@@AG@A`@@@@A BH@A + C* C*@@@A @AjDSTORE-KEYWORD-ARG-VALUES-INTERNAL-LAMBDAFFFFFFAOdd number of keyword args: ~SF5Keyword arg keyword ~S unrecognized.F4BF2BF,BF#BO;B9hn@(j"@ C"C@A$B@@@A @Aj@ "C@A B@B`&@`(@9"*@ * C,C@@@A$@AdA,@ A&B@B@@@A 1@Aj@@j@ &A,@ A&B B@B(A A'B@B@A, B' C+ C&A$B@@@A@A(DÂARRAY-ROW-MAJOR-INDEXFFF F*BF)lSubscript ~D, ~S, is out of range (0 to ~D) for ~SF(BF&BF%BFBFlThe number of subscripts (~D) given does not equal the rank of ~SF BF BF BOB<9hn@(j"@@A4 @"CAFARRAY-COLUMN-MAJOR-INDEX<=FFBy FFREVERSEFFB<FBo>FFOBhn@(j"@ C@@@A@A @A  A@B"C@A!C@B@@@A @Aj@ "C@A B@B"C@A!C@B@@@AD@Aj$@"&@`(@&@@@AC@A& C' C$C@@@A;@A$C@@@A ;@A$A A)B@B@@@A <@AjD&@@@AC@A& C' C( C,@A hDjDCARRAY-IN-BOUNDS-PFCF:F<F3F;F/F;F)FCF#FDFFFF FF=FFABrFF@BFF?BFF7BoFF6BUFF0BXFF,BFF+BFF*BFF B'FFBFFBLFFBXFFB FFBLFFB'FFBFF BLFF B>FFBOFFBo>FFFFBFlThe number of subscripts (~D) given does not equal the rank of ~SFBFBFBF B: F B: OB9d$@ j&@j(@$C@@@A  @A"C@@@A @A"D A#C@B@@@A@A#C$ C@A "&@$C@@@A @A&C@@@A@A"D A'C@B@@@A*@A(A'C@B$ C,@A &(@(@@' C@A DELQFFFFO-B9$@A  &@ "A'C@B@@@A @A @A jD$A' B&@@@A @AhDÀEVERYFFFFFBOLB.9$@A  &@ "A'C@B@@@A @A&D$A' B&@@@A @AjDSOMEFFFFFBOiBM9 A@B@@@A  @A C@@@A@A B@A|`D!C@A #C"C@AAB@B@@@A @Ah@@@B"A B"AAB@B@C@A DCMAKUNBOUNDFFFFB[FBFCDTP-ONE-Q-FORWARDF lDon't makunbound ~S pleaseFDB-BOBj9h@@@B C@A B C@AAB@B@C@A DFMAKUNBOUND<=FF BF B FF BFFBFFBFFBFFBF>FFFFB[FBOB9j"@ C@@@A  @A C@A @B@@@A @A@A  A@B C@@@A@A C@C@A|`D $@ $ C$C@AAB@B@@@A @Ah@@@B$AAB@B$A"@@@@@A 1@A @@B@C@A|`DLOCATION-MAKUNBOUNDFFBFFBFFB#F>FFFFFF(B[F%BFBFla location (something to take CONTENTS of)FDBB2BFLOCATIONOB, C@@@A  @A C@A @B@@@A @A@A  A@B C@@@A2@A!C"AAB@B@@@A'@A@B@A@B@A!CcB@BAG"AAB@B@@@A1@A!CAFhD $@j&@% C&AAB@B@@@A C@A&AAB@B@@@AF@Aj@@$ C4@A &AAB@BAGLOCATION-BOUNDPBFF8B'FF7BFF4BZFF0BFF/BlFF*BFF)BFF&BFF%B'FF$BFF#BFF!BFFBFFBFFBFF%P-CDR-CODEFFB#FFB>FFBFFBFB#F>FFF FGB[F=DTP-EXTERNAL-VALUE-CELL-POINTERF6BF.lInvalid CDR code in list at #o~O.F(CCDR-ERRORF Á%%Q-DATA-TYPEFB[FCCDR-NORMALFla location (something to take CONTENTS of)FDBB2BF BOlB9!C"AAB@B@@@A@A@B@A!Cb@@B@A|`D"AAB@B@@@A@A!C@B@A|`Dh@@@B A!C@B@C@B@A!Cb@@B@A|`DBFFFF#BFBFlInvalid CDR code in list at #o~O.FB`FBFBeOB9 C@@@A  @A C@A @B@@@A @A@A  A@B C@@@A@A C @@ E"@%FCSTORE-CONDITIONALFFBFFBFB#F>FFFFla location (something to take CONTENTS of)FDBB2BF BOB9 C@@@A@A @A  A@B@B@A"DFSETFBF>FFFF DBADBDB=DSYMBOL-FUNCTIONBCDEFINITIONFBFBOB1DBDB:B DB:pB(,OBSOLETEDB:pB(STYLE-CHECKER1DBDB:B DÁSTRING-APPEND,is an obsolete DCONDDDÁSPECIAL-FORM-PDB:B special formDDÁMACRO-FUNCTIONDB:B macroDDBKDB:B ,functionDB-forml; use NAMED-STRUCTURE-PDB:B,hn@(j$@ C@@@A @A"A "B @A C@@@A@A@A  A@B"C@@@A@A@A "AAB"@@@B@BA C&C@@@A0@A&A@B@@@A /@A&AA B0@&@ &@@@A 6@A@C@AjD&C@A@B@@@AC@A&A @$B@C@A|`D&A @@B$B@C@A|`DBrFFBOFFB>FF BFFBFFBOFFBo>FFF FESELFF-pB NAMED-STRUCTURE-INVOKEF'BrFBZFBZFB: FBFBFCOPERATIONOgBr9hn@(j @!C@A4!C"AbB!CAFCALL-NAMED-STRUCTURE<=FF By FF BFFBnFFBFFBrFBFFBo>FFOBh1DByDB:DBzTIME-LAST-VALUE1DBDB:BDB:DB:B1DByDB:DBzÂLAST-MICROSECOND-TIME1DBDB:BDB:DB:B1DByDB:DBzÂMICROSECOND-INCREMENT1DBDB:BDB:DB:B1DByDB:DBzÁSIXTIETH-TIME1DBDB:BDB:DB:B9j @j"@j$@h@@@B@B@AAC"AABAB@B"@@@B AA@B@@@A'@A AA@ B$ C`PB@B@A$B@B@C@A|`D @@@B@B@C@A|`DÁTIME-IN-60THSFF F*BF(BF"BFBFBFBF BFBFBOB9j"@ C@AfB@@@A  @A C@AfB@@@A@A Ab@bB CA C@ CA C@ C&A@B@A(AAB,A%B@B*AABAB%B*@'B(@(B@B-BAFpBTIMEFFFFF F1VALUES-LISTF+C+F*B F(B:F'l~&Evaluation of ~S took ~:D microseconds.F&Á*TRACE-OUTPUT*F%B3F"DDpTIME,MICROSECOND-TIMEFMULTIPLE-VALUE-LISTFDDB>FDDB>FB DB BKOLB9j @  @@@A@A BAGAGTIMEFFFFFBOfBM9j"@ C@AfB@@@A  @A C@AfB@@@A@A Ab@bB C%FÁ%MASK-32-BITSFFFFFFDB DC^FF FÀLOGANDDB BOBg9 A#BAF%32-BIT-PLUS<=FFBRFFBF>FFFOB9 A#BAFC%32-BIT-DIFFERENCE<=FFBRFFB`F>FFFOB9 B@E#BAFÁ%32-BIT-LESSP<=FFBoFFBRFFBRF>FFFFOB9 B@E#BAF%32-BIT-GREATERP<=FFBFFBRFFBRF>FFFFOB9hn@(j"@ E#FB<=FFBy FFBo>FFOB9hn@(j"@"@@@A  @A C@E!CAF"C@@@A @A E#CAF A`@rB"C@C@A"CAC@B@C"$@ $C@C$ C$C@@@A @A$C@@@A (@AAG$C@C@@@A6@A% C2@A &C@C' C&@@@A /@AAG$CAFBy FFFF7By F6lThe last argument to ~S was not a list: ~SOLBy By Oy ÁLEXPR-FUNCALL C@@@A@A @A  A@Bh@@@B C@B@A% B@B@A$ B@B@A$B@CA C@B@A$@(A&B@ B(C@@@A+@A@B@A% B-@A $AcB@B@A$ B@A41 B2C@@@A;@A"A2 B>@A "A3C@ B@A41 B2C@@@AH@A.A3 BK@A .A3CA B*@@@Aa@A,AcB"A.B@@@AX@A$BX@A "A,@bB`B$`}@@C@A|`D4A6B@@@A @A(C@A"AAB@BAC@B@@@A@Aj@@$C@A@B@@@A@A@B@AAB,@5C@B4A6B@@@A@A,A4B@B@AAB8B@B@AAB8BbAAB@B@B@AAB8B8A8AcB6A4B@CbB(C@@@A@A"AAB$B@A "A$@bB`B$`}@@C@A|`D&AbB@@@A@A@A"@ %C:C@AbB:C@A"A@A4;BAB@B:A$C0@ $C@B$A<B@B@A$B@AAB<B$A<B`B<`}@@C@A|`DBF7F;F*F-F%F+FF FF=F^FBFB FFBFFB FFBFFBFFBFFÃCOPY-ARRAY-CONTENTS-AND-LEADERFFBi FFB`FFBiFFBFFBFFBy FFB FBFFBFFBFFBlFFB'FFBFB FFBuFFB FFBFFBFFBFFB FFB`FFBFFB FFBFFB FFBFFBFFB FFBFFBFFB FFBFFBFFBFFBoFFBFFB FF}BFFzBFFuBFFrB FFmBFFlBFFkBFFjBFFfBFFbBFF^BF\B FFZBuFFVBFFQBFFOBnFFJB FFIB FFFB FFAB FF@B FF?B F=B FF<B FF9B FF4B FF3B FF2B F0BFF.BFF,BnFF)BFF'BFF"BFF!BFF BFFBFFBFFBFFBFFBFFBFFBFFBFFBFF BFF BFFB>FBOF>FFFFB FB FB FB~ FBs FB FB FÃ%%ARRAY-INDEX-LENGTH-IF-SHORTFBFBFB+ FBbFBFB FB`F|B FyB FtBFiB( F[B FUCan't make displaced array ~S biggerF-B F&BBFDTP-FIXFB$ FB& F B+ F BFB: FB: O\B9!GÁRETURN-STORAGE<=FBbF>FFOjB]1DBDB:B]BB1DBDB:B]DBBDBDDBDB:B]BDDBDB:B]BDDBKDB:B]BBB do nothing to let the GC take care of it,or call SI:WIPE-STRUCTUREB B]O]RETURN-ARRAY1DBDB:B}BB1DBDB:B}DBBDBDDBDB:B}BDDBDB:B}BDDBKDB:B}BBB do nothing to let the GC take care of it,or call SI:WIPE-STRUCTUREB 1DDEFVAR-RESETTABLE-1DB:INHIBIT-FDEFINE-WARNINGSBBT turns off warnings of redefining function in different file.:JUST-WARN turns off queries, leaving just warnings.9j"@ C@@@A@A!G C@C@@@A@A C@AAB"@@@@@A@A"A B@@@A@Aj@@!GjDÂVALIDATE-FUNCTION-SPECFFFFBF ÂFUNCTION-SPEC-HANDLEROB1DBÁENCAPSULATIONencapsulationDEFINITION-TYPE-NAMElj$@ j&@ j(@j*@j,@ C C@@@A @A C @A (A@B@@@A )@A A$@@@A@A@A &@@@@@A %@A$C@@@A %@A@B@AhB@B@@@AZ@A,@@@AI@A$@@@AI@Aj@@! C+ C/ C`@1@.@@@A;@A A0@@B A*B@@@AH@A@B@@@AH@A A#B"@@J@A  *@*C@@@AQ@A*A"BY@A (A@B@A*@"B@AhDjDFDEFINEFFFFFFFFUBFRBF@BF9pB PREVIOUS-DEFINITIONF!BFBFÀDEFUNF pB ,INTERNALO.B9j"@ C@@@A@A!G C@@@A@A C@AAB"@@@@@A@Aj@@"E!F!FBFFFF,The function spec ~S is invalid.FÂINVALID-FUNCTION-SPECFBF BOSB9j"@ A@B C@@@A @A!G C@@@A@A C@AAB"@@@@@A@Aj@@"E!F!FFDEFINITIONFFFF,The function spec ~S is invalid.FBOFBTFBFÁFUNCTION-SPECO}BT9j"@ C@@@A@A C@@@A @AhE!C`AFjD C@@@A-@A C@AAB"@@@@@A-@Aj@@"A B$ C`@'@$@@@A,@AhE&@@@@@A )@A!C@@`AFjD!FBFFFF.,The function spec ~S is invalid.F-BOFBFBOBDWIMIFY-PACKAGEOÂDWIMIFY-FUNCTION-SPEC9"@A j$@"AA B&C@A B@@@A@A&C@A B@@@A@Aj@@ D A" B$@@@@@A@A$DhAj@"@ @"A@B@B@A BFFFFFF"ÂDWIMIFY-ERROR-MESSAGEF,~1@*~S is not ~AFWRONG-TYPE-ARGUMENTFDWIMIFYBOB9$@A j&@$A@ B(C@A B@@@A@A(C@A B@@@A@Aj@@ D A% B&@@@@@A@A&DhAj@$@ @$A@B"B@A BmFFFFFF"BF,The argument ~3@*~S is ~1@*~S,~%which is not ~AFBFBBOBm1DBBDBBFDEFINITION-LOCATIONldefinitionÂFUNCTION-SPEC-DWIMIFYB1DBBa valid, defined function specB1DBÀBOUNDPDBBBvalueBhB1DBBa symbol with a valueB1DBDB:DWIMIFY-PACKAGE-0-TOPIC-PRINTEDBBB9j@@@B A @"A@B@B@C@A|`DB<=FF BFCDWIMIFY-PACKAGE-1FFBBFFBF>FFFFBFB#O<B8j&@$ C% C$ C C@@@A@A(A B@@@A@Aj@@ D C@@@A"@Ab@`@  C@Aj@"@$Bk F!@A AF@A C@@@A'@AjD*A B@@@A0@A,A @"@$Bj@@@@@A5@A@D AjB@A B@@@AA@A AjB@A"@$Bj@@@@@AF@A@D C@C@@@A`@A C@AABA B&@@@@@A`@A C@A&B@@@A`@A&A!C@B@A"@$Bj@@@@@Ae@A@D C@@@A@A C@C@@@A@A C@AABA B&@@@@@A@A C@A&B@@@A@A C@A!C&@!C@B@A"@$Bj@@@@@A@A@D C@@@A@A C@C@@@A@A C@AABA B&@@@@@A@A C@A&B@@@A@A C@A!C C&@ C@B@A"@$Bj@@@@@A@A@D C@@@A@A C@C@@@A@Aj@@b@`@ C@C@Aj@4 @"@$ Bk F@A AF@A jDB-FFFFBFpBmUNWIND-MARKERFPKG-KEYWORD-PACKAGEFpB FMB FCDWIMIFY-PACKAGE-2FBFB O B-9 A#C@B@@@A @A"C@A @"C@B@E$@'F@DBFFO3 B9hn@(kC>AjB>A$Bj(@A B!j,@ * C,AAB@B@@@A @A A, B(@@@@@A @Aj@@>C@A(@>C@B @A + C*@@@A  @A@B@@@A8@A@B@A8@A(@@@A 8@Aj@@ EAB@A4>BAFjDBFFFF2C*PACKAGE*F)*ENABLE-SPELLING-DWIM?*F$C*SPELLING-DWIM-IS-LOADED?*F B FBfO B9>C@E @>CAFBP <=FFBy FFBb FB^ F>FFO BP 9 EAFÂDWIMIFY-PACKAGE-2-HELP<=FFB3F>FFFFl~&Y to use it this time.P to use it every time (permanently link the two symbols).G to use it this time and do a pkg-goto.N to do nothing special and enter the normal error handler.O B 9 C@@@A-@A C@AA Bb@`@"@ B(AABA B*@@@B&A @"@$ B@C| B@A|`D|`DA B*AAB@B@@@A,@AjDjDjDBFFF F%pB ,CONDITION-NAMESF#BXFBFpB<lCONDITION-HANDLERSFB FÀG8606FpB<CONDITION-CASE-THROWF BXF B FB FBO B@j$@ j&@  A@B@@@A @AhD A@B@@@A@AjD A@B@@@A@AjD A@B@@@A@AjD A@B@@@AL@A@B@A2@A"A$ B@B@A(@&B@A|`Dj*@j,@j.@@ B0@@@AK@A1 C0 C1 C0 C*A"B@@@AJ@A,A$B@@@AJ@Aj@@.D7@A &D A@B@@@A@AAB# C@B2C@@@A b@A2AAB@B@@@Ad@A#Cd@A @B@Ar@A@B@A"A&B$B@C@A|`D"A&@$ B0AAB@ B4@@@B@C@A|`D A@B@@@A@A"A& B@B@A|`D @"B@A|`DÃFUNCTION-SPEC-DEFAULT-HANDLERFFFFFFFF~S is not implemented by the function spec ~SFDPUSHARG1DGETHASHKEYFUNCTION-SPEC-HASH-TABLEFÁPUSH-PROPERTYFzCCOLD-LOAD-FUNCTION-PROPERTY-LISTSFvB{!FkpB ,PUT-HASHFhBu!FdBu!F\PDL-AREAFSBACKGROUND-CONS-AREAFRCDEFAULT-CONS-AREAFMBF5B{!F-pB ,GET-HASHF*Bu!F$Bu!FBBFBFCCOMPILER-FDEFINEDPF FUNCTION-PARENTFBO!B 1DBBÃPROPERTY-FUNCTION-SPEC-HANDLERBj$@ j&@ " C# C"C@ApB@@@A@A(C@@@A @Aj@@ A@B@@@A@AjD#F A@B@@@A @AhD A@B@@@A)@A(E*@%F A@B@@@A1@A(E+F A@B@@@A9@AAF A@B@@@AA@A(E+F A@B@@@Ab@A*C@@@Aa@Ab@`@X*C@Aj@4"@$@& B|` @@ B, C`@/@.@@@@@A`@A,DjDjD E"@$@'FB!FAF6F9F.F1F%F)FF FFF FF FFFF=FFeB FFYBFFXB~FFVBFFSDB,B!FPBFFGBFFCBFF@B1FF;BFF8BFF3BFF0BBFF+BFF(BFF"BFFBFFBFFBFF BFFB'FFBLFFÀTHIRDFFBF>FFFFFFF FLBFKB FBBF:CFUNDEFINEF7DB=DBBBCINDICATORF2BF*DBTBF!BFBFlInvalid function spec ~S.FBOFBO "B!9 A#C@B@@@A @A"C@A#C B@E$@&@iF@DB!FFO#"B!1DBB,ÃINTERNAL-FUNCTION-SPEC-HANDLERBlj$@ j&@ " C# Cj,@(C@A@B@@@A@A( C(@@(C@AAB@ B*C@@@A@A*C@@@A @Aj@@*C@@@A&@A"C@ApB@@@A 3@Aj@@ A@B@@@A.@AjD"B@A|`D A@B@@@AF@A,@@@@@A E@A(C@@@AD@A(C@A|`DjD@D,@@@AJ@AL(.@ (CA Cj0@j2@j4@j6@.C@A@B@@@AY@A/ C.@@.C@AAB@B@@@Ab@Af@A "@.B/ C6B@ C6B@ C0@@@Aq@Au@A "@.B*C@@@A@A*A4B@@@A@A@A "B*A5 B*@@*A1 B2@@@@@A@A@A "B A@B@@@A@AhD A@B@@@A@Ah@@@B$A.@2B@C@A|`D A@B@@@A@A.A2B@A|`D A@B@@@A@A.A2B@A"B@C@A|`D A@B@@@A@A@B@A.@2B@A|`D A@B@@@A@A(A`@B@A|`D A"@$@&B@A|`DB$"FFFFFFFFB)FB!FBFBFBFBTFBFBFBFThe function spec ~S is out of rangeFBOF,The function spec ~S refers to a non-existent internal functionFBOFrlThe function spec ~S refers to ~S, which has no internal functionsFqBOFjpB(lLOCAL-FUNCTION-MAPFgpB INTERNAL-FEF-OFFSETSFcThe function spec ~S refers to ~S, which is not a FEFFbBOF[DTP-FEF-POINTERFRB F4BF/,The function spec ~S is invalid.F.BOF(BFB"FB O#B$"1DByDB:DBzBu!1DBDB:Bu!DB:BDB:B1DByDB:DBzB{!1DBDB:B{!DB:BDB:B9 C@@@A@A E$@#F@B@A  @A&@A C@@@A@A C@C@@@A@A C@AA Bj&@&@@@A#@A&E @"@%F!FBFFFF$,The function spec ~S is invalid.F#BOFBFBF B FBu!OK#B9 C@@@A @A E$@"A A%B@BAF@B@A @A&@A C@@@A@A C@C@@@A@A C@AA Bj&@&@@@A'@A&E @"@%F!FFUNCTION-SPEC-PUSH-PROPERTYFFFF(,The function spec ~S is invalid.F'BOF#By!FBFB F Bu!O#BL#9j$@ C@@@A@A E"@%F@B@A @A&@A C@@@A@A C@C@@@A@A C@AA Bj&@&@@@A+@A&A B@@@A*@A&E @"@%FjD!FCFUNCTION-SPEC-GETFFFFFF,,The function spec ~S is invalid.F+BOF&BBF BFBF B FBu!O#B#9hn@(j @@B@E!FFUNCTION-SPEC-GET-1<=FFBFFBFFBo>FFFFB!FBu!O#B#9hn@(j @ EABAFFUNCTION-SPEC-REMPROP-1<=FFREMHASHFFBFFBo>FFFFBu!O#B#9hn@(j"@"E A"AABABAB@BAFÃFUNCTION-SPEC-PUSH-PROPERTY-1<=FF PUTHASHFF BFF B2FFBs!FFBFFBo>FFFF Bu!FBu!O$B#9 C@@@A@A E#F@B@A  @A$@A C@@@A@A C@C@@@A@A C@A@ Bj$@$@@@A!@A$E @#F!FÂFUNCTION-SPEC-REMPROPFFFF",The function spec ~S is invalid.F!BOFB1FBF B FBu!O4$B$BNpB6THIS-IS-A-PATCH-FILE1DBDB:ÂFDEFINE-FILE-PATHNAMEBBlGeneric pathname of source file being loaded or evaluated, or NIL.1DBDB:PATCH-SOURCE-FILE-NAMESTRINGBB,While loading a patch, holds namestring of generic pathname of the source of the patch.1DByDB:DBzFDEFINE-FILE-DEFINITIONS1DBDB:BA$DB:BDB:,List of definitions made while loading this source file.1DByDB:DBzNON-FILE-REDEFINED-FUNCTIONS1DBDB:BL$DB:BDB:Functions from files redefined from the keyboard and confirmed by the user.D"@A @B@AhB@A @B@B@B@A@@A@B@A@@Aj@@j@@@B@B@C@A@B@Bj@@@B@B@AA B&A@B@@@A 0@A@B@B A"@$B@B@AABj@AB@BrC@@A @ B A"@@BA B A@ B@B@A]@A*AAB@B@@@A ]@A*AAB@B@B@B,@@@A s@A"A@B@@@As@Aj@@@B@Ap@A A(@@Bp@A @C@AhD,C@@@A@A"A@B@@@A@A(A,Bj@@ (A"A,BAC@B@@@A@A@C@AhD,@@@A@A,C@@@A@A,B@ C,@@"A- Bj0@.@@@A @A@B@A@A# C,A/C@ B@A h@@ $@@@A@Ah@@ @B@A@Ah@@ @B@A @A AAB@B@@@A@Aj@@h@@ @B@@@A @Ah@@ j2@. C4@@@A@A5 C4 C2C@@@A @A2A@B@@@A @A20@ @A j0@0@@@@@A @Ah@@ (A@B@@@A@A A(@"@0B@@@A@Aj@@@B@A@A@A  4@4AABA B6@@@Bh@@ j@@@@@AAA@B@A AA.A(A(A/CABAB@B A,@@B@C@AhD@C@AjDBpBmUNBINDFF=RECORD-FILE-DEFINITIONSFF<BFF9BFF6BFF4BFF1BFF/BFF*PKG-FIND-PACKAGEFF'BFF#BFF!BFFBFFBFFpB6PARSE-PATHNAMEFFBFFBFFBFF BFF BFFBFFBFFBF>FFFFFFF.F pB ,SOURCE-FILE-NAMEFB7$FBL$FBL$FB7$FPATHNAMEFpB lPATCH-FILEFB%FÀFQUERYFBL$FB7$FB6$FB7$FB)FxB)FmBd%FgB7$FaB)F[BA$FXB!FVBA$FOBA$FJB7$FHBd%FDB!F@B7$F;B7$F8BA$F5B7$F0B F.B F)pB FINDF&BdF%B%F"B7$F B<$FB7$FpB ,GENERIC-PATHNAMEFB<$FBA$FB<$F B6$F B!FB!FBB)O%B9 AjB AhB@BAC"@A @B@A#C@ B"C@AABA B@A  A$B@B@A$@@B@ B' C&C@@@A@A#C"C@@@A@AjDMAPATOMS-NR-SYMFFFFB_FBfFB_FBfFBbO%B%9h@@@B!C"AAB@B@@@A@A C@A!C@B@A "AAB@B@@@A@A C@A!C@B@A "AAB@B@@@A+@A C C@A%C A$B@B@A  `}@@C@A|`DBFFFFDTP-BODY-FORWARDFCDTP-RPLACD-FORWARDFCDTP-HEADER-FORWARDFBO#&B1DBDB:CDEFMACRO-SET-INDENTATION-FOR-ZWEIDB:Bh"@A "A@B@@@A @A A@Bj@@@@@A@A@D C@@@A@A A@ B"C@A$B@Cj@@@@@A @A@D"A@B@@@A2@A A@B@@@A2@A A@B@A@Bj@@@@@A7@A@D"A@B@@@AI@A A@B@@@AI@A A@B@A@Bj@@@@@AN@A@D"A@B@@@AU@AjD C@@@Al@A A@B@@@Ad@A A@B@CAG C@@@Ak@A C@CAGjD C@@@A@A AhB@@@A@A C@A@B@@@A~@A CAG!C@B@C@@@A @A!C@B@C@@@A @A C@C@Aj@h@jBjC`PBb@A@@D@D C@@@A@A C@CAGjD C@@@A@A!C@B@@@A@A!G!C@B@C@@@A @A!C@BAG@DjDÁDOCUMENTATIONFFFFFFpB DOCUMENTATIONFB)&FCCOMBINED-METHOD-DERIVATIONFpB(,D-IGNOREFB)&F~B)&FwB F`INTERPRETER-SPECIAL-FORMFZB&FOB FGB FDSETF-METHODF>B&F8BAF0B F-ÁTYPE-EXPANDERF'B&F!TYPEFÂDOCUMENTATION-PROPERTYF B&FB B O&B)&1DCSET-DOCUMENTATIONDB:B)&DB:BAB9j"@ C@AfB@@@A  @A C@ApB@@@A@A Ab@fBj$@! C C@@@A@Ah$@ C@A j(@gC@ C*.@.E&A)B,C,0@/ C. C$@@@A )@A44@@2@4@1B.B`AFDBB)&B&FFFFFF-B)&F)B'F'DB:B DB BE'OF'B'9# C&A AAB@ B(@@@A @A(A$B-@A $@@@A-@A C@AAB@B@@@A@A@B@A @B@B *@,j.@&A$ B0A*A,@/BA B*A,@2B@C|`A@$DB'FFFFB&FB!FB!FBFBbFB&O'B'9j"@ C@ApB@@@A  @A C@ApB@@@A@A Af@fB C! C%BAB%B%B@B@AAB%B@B@A@B%B@B@AAB@B&B@BAFÁMAKE-OBSOLETEFFFFFF7DDB:BF5l; F3DDB-formF1D,functionF-B:F,BKF*DmacroF&B:F%BF#Dspecial formFB:FBFBF,is an obsolete FBFB:FBFDDB:BDB:BFB:FBFÀPROGNDB B'O'B'1DFASL-RECORD-FILE-MACROS-EXPANDEDDB:D&DB&`DFOR-EVERY-REGION-IN-AREA*DÁCONDITION-CASEODCCONDITION-CASE-IF?JODSELECT-MEMQnDCCONDITION-BIND-IFaDCWITH-LISTDCWITH-LIST*~DBgmXDÀASSERT4;DSIGNAL-PROCEED-CASE:DDOTIMESo\DB ]$DTYPECASE DÀDOLIST5DB ccDB= LOOPDCXR-BQ-LIST~DXR-BQ-LIST*B+DÁDO-ALL-SYMBOLS:0DINCF9QDCCHECK-TYPE]lDB6DÀUNLESS;$@DpBlIFu}DÀSELECTIkDCASE:-DÁGET-FROM-AREAmDBq!Z%DWHENDÀPSETQ+FDPOPIDCWITHOUT-INTERRUPTS=WDB=6DBAJDBDgDSENDX