; RHQU*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading VECTOR 73   pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071VECTOR73VERSIONU*U.UPUSHFUNCTIONLAMBDAXORFILE-EXIT-FUNCTIONS      xGETEXTENDU+U*ULOADLISPFASL!#!xFEATURECOMPLRSPECIALVECTOR-CLASS*LEXPRW*U.UMAKE-VECTOR%')xFBOUNDPFLUSH-MACROMEMOSAUTOLOADDEFMAX+-#-xANDBOUNDPU+U*ULOOP-PATH-KEYWORD-ALISTforget-macromemos|LOOP/113xCONSVECTOR-ELEMENTSI:LOOP-SEQUENCE-ELEMENTS-PATHOFFROMU*U*UTOBELOWABOVEDOWNTOINBYVREFVECTOR-LENGTHNOTYPEU:]*UDELQASSQ1579;=? A!C511xVECTOR-ELEMENTS1"79;=? A!C"11xLENGTHSI:MAKE-EXTENDVSETSI:XREFU*U*PSI:XSETSI:EXTENDSI:EXTEND-LENGTH*:AR2*:ARNSI:VECTOR-SRCTRNSSUBR,8A0[0D+ E0N`z H Z`[-, $#-, * B`P( +1?+ G`1?7I@AZ`-, * B`++H Z "-, $%-, * B`P @2+0D +ZK-, * H  B` J& M H'-,*U,x$x(YMAPCMEMQSOURCE-TRANSW*FPUTPROP/%Q)SOQ*UOQ* ?GxCLASS-OFVECTORP+` " jU*P,x8(;*RSETSI:CHECK-SUBSEQUENCERSI:CHECK-MULTIPLICITIES*:AR3(!,87F,+0,83 Y J' S,8",83g,84i,85K<-B '0.`Y[. Y J' &]3 H` ..`-,`DDK/,xM? x( Au0xVREF SETF-X-ACCESS`@,8-,,X` -,7 $-,,xp(kP 0VREF SETF-X-INVERT` "-, $ -,7 $ U-,7 G-,,xx((;VREF SETF-XSETF-Xu ?0axSETF-STRUCT-,[Z[Z  0[ (@,8-,1 $ -,cXB & _ "/*1(@"B,87H,` Y J' ,S,8,83,8_,8`K<-(4 '0.+V[. Y J' &@],Xg~3 .-,0 0 $-,//+2KU M? 8(SI:MAX-EXTEND-SIZEPSI:CHECK-TYPERU( 0MAKHUNK**SELF-EVAL**LSUBR-0 @ ;+fZ(` "7D, 0` & c2,<d.. "p`e XJ (3QH3` `k+t+z@0.. g-, $-,/ `ˀ Np "p B`+r0 :p,xYgaARGS4M[x-00(C7D,+  c2 B` `d.. "p`e XJ (3QH0@,< pK`.. p.Z@ "-,A ` `-,/:p+C,x\g}HUNKSIZE7D,+ & W2 `] B`i/.-,,x(!SET-VECTOR-LENGTH!,<,<,87F,+'Bi Y J' A,8,8g,8,85k,86mK<- '0.`G!PD [. Y J' &]3  F`i 0.`Z7  Pp (p,82o``c gB g~-,/`[-,0 "//,xY5"t0 kP( -&restv-ify|,<,8 p(5.; ./np+< * J`.. "p`e XJ (3QH3 +C `/pˀ,<02.w`..;.p.0 Z@ "-,A `-,/A@@;+F//jU*U,x`(o*READLASTNot a proper list for #(w:T o8q9sp::x: xERROR#-MACRO-(`m3@ `6 ` `7Z7 ` ,8` g-,13-,7",ou@2 `E.. "p`e XJ (3`0QH,<,87@g+k[g ..p $ B`-,/ `0:pZg Bg`.u/,x:0(P#-MACRO-DATALIST/%'wxwwxW*].UMACRO< y;wxDOVECTORMACROEXPANDED={xDOVECTOR MACRO=>yxMACROFETCHWrong number args for macroU*U*UGENTEMP:LOCAL-VAR1+=FIXNUMDECLARE*NCONCDOLET0MACROMEMO`}c `E0.` @,8e,8g",ouZ`Z[[Z [(Z([,8,85F~Q0 ,g &@ $ aU ,g &@D $ aU ,g &@ $ aU`0-,13-,-,1`2 g~-,1 -,-,1 Y -, g~-, g~-,1H g~-,1 $ -,-,1 03-,-,1,X-,,X`-, g-,13-,  0 $A-,-,1*g-,13  -, -,-,1 $B-,0 3+'A 8@ 2an+' g}-,1 g~-, ?@ -,-,13-, $-,0(-,1`O "3a,X-,0@  g-,,X-, $C-,0d-,1,X-, -,00/ &= $ `D,x%kU ?`(nMACAID+-#-xLISTVECTOR-POSASSQ,8 "`-,i/.,<,80 03Np`..-, B` A " Z0BE`[`Q3B `-,+C@;+8 "/0:P/+ X(3EQUALSI:COMPONENT-EQUAL@0,8i/. `i/.S+U,< p2Nw+M " +T..-, ..p-,1@a,XF:p` "`  U "//,xh( SUBSTSI:SUBST-INTO-EXTEND`,8i/... "p`@`e+XC` "3QC`,< pS` `+l0.. 0.p -, & 03 gG $ `-,/:p U+a//,xx( WEQUAL->VECTOR-CLASS+INTERNAL-LOSSAGEDC g`W g $HWa` ` `W ` ga,x@g cADD-METHODIFHxSUBST->VECTOR-CLASS,X/i_+].WLg(IGxVECTOR-PRINLENGTH/%'JxJJxSI:PRINLEVEL-EXCESS/%'x#KxW+U*USI:PRINLENGTH-EXCESS/%'x...LxSI:NORMALIZE-STREAMPRINLEVELTYOPRINLENGTHU(0PRINT-OBJECT):PRINT-SELF->VECTOR-CLASSs g~i/.:p g@ ` Bg p5Nb# " `C7DM"+3.+  ,8",D <`CXG,<,8 ps`;7@`` , ,8,8$3",<N B ` * J`7BJ+ 3np`%"+ 2np+ +,83",D<`; 9,8 ..p g}-, *w,8g~3",<O:p` B C,8I,8g~", <N/,x#()#(%kU*g@0x:PRINT-SELFIPxFLATSIZE-OBJECTFLATSIZE->VECTOR-CLASS,<@  g~i/.-,7@g`W gˀ Np "p Bg `[ "Q+J7@g +27BM+2 g3.+2M+J3@+: ,8,8 g}@333@a",o ..-,+J `  p}-,+I@0 ,8 .û g}-,333",o w.ˀ,\  Pp+VECTOR-CLASSi/.X " ` ,R,8,8g~K<S`W` ` $T/,x#()#g (LW*@0SPRINTIUxGFLATSIZEGFLATSIZE->VECTOR-CLASSi/.-,,<h,< p2O`+` ` @  "Q`û-,`ˀ 0.p 0 g -,` .nw`` Np+[/,xg u*TPIVxSQUIDSXHASHSI:HASH-Q-EXTENDSXHASH->VECTOR-CLASSW0z /zU*Uig IWXxSI:DESCRIBE-MAX-LEVEL~%~vTThe vector ~S has ~DU;]* elements. YZ[\px xFORMATDESCRIBE->VECTOR-CLASS `[ "``W ,8,8g,8w33 g|i/. *pK<]a@`K+v "/,xg(W+^DESCRIBEI^xSSTATUS/EW( (?(x;