; RHQU*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading VECTOR 72   pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071PUTPROPVECTOR72U*U.UVERSIONPUSHLAMBDAXORFILE-EXIT-FUNCTIONS     xGETEXTENDU+U*WLOADLISPFASL!#!xANDFBOUNDPSPECIALVECTOR-CLASS%''xU+U*WFLUSH-MACROMEMOSAUTOLOADDEFMAX)))#+xBOUNDPLOOP-PATH-KEYWORD-ALISTforget-macromemos|LOOP%--/xU*U*UCONSVECTOR-ELEMENTSI:LOOP-SEQUENCE-ELEMENTS-PATHOFFROMTOBELOWABOVEDOWNTOU*U*uINBYVREFVECTOR-LENGTHNOTYPEDELQASSQ-13579; =?1--xVECTOR-ELEMENTSu*F@ - 3579; =? --xPTR-TYPEPVECTORPSUBR`A0B  " ,x]*U*UCFEATURECOMPLRDEFCOMPLRMACEVALDEFMACROVNLISTW*U*USI:XREF"E; #G$;I%K&I%x*RSET*:ARNSI:CHECK-SUBSEQUENCERSI:CHECK-MULTIPLICITIESU!*:AR2*:AR3,8M+,8 O J( ,8,83+,8-,8@@KoQ (0.` ")`S O` J( *U3 H` ..` "-,/,x' ;"/T C xVREF SETF-X-ACCESS`@,8 0-,,X-,7 $-,0.T,xXC/VSETVREF SETF-X-INVERT` "-,d $ -,7 $-,7 W-,j] ,x`C(VREF SETF-XSETF-X;Y-xSETF-STRUCT-,[Z[Z [ (@,8-,1D $ -,B & $, "+1nU`j[dC"VALSI:XSET"EW #G$WI%.K]I%.x,8EM`w O J( ,5,8,8D"3,8A,8BKoQ (Ph"0.+8 ")`S O J( *U,Xg~03 .-, $`2-,//+ '"*W ; \CWMAKE-VECTORLIST*SI:MAKE-EXTEND"E/ #G$/%_0%xU*@!"SI:MAX-EXTEND-SIZEPSI:CHECK-TYPERMAKHUNK**SELF-EVAL**M` &/ a1 B` `.. "p`c XJ @`] (2QH,xxCC&RESTW(  SI:EXTEND"E #G$ e_3xLSUBR-0M` & !@ a1 B` `.. "p`c  0XJ (2QH,< p@K+^.. p.Z@ "`-,A `-,/:p`0A:u,x`gSI:EXTEND-LENGTH"E #G$IK4IxHUNKSIZE!D0M` & $!1 B`i*/.-,,xC`SET-VECTOR-LENGTH,<!,<,8M`,8 O J( ,p,8,8g,8 ,8 ,8@@KoQ (0.+s ")`S O"` J( *U3 F`i  0.`@  Pp (p,82o`+ g g~-,0A@/+}-,/D"/,xO 5 k] Cf&restv-ify|,<,8 p ./np ` * J`.. "p`c XJ` (2QH3`% +/pˀ,<@2.w+..;.p.Z@ "`-,A `-,/@;`+/0@`]/,xC*READU*U.wLASTNot a proper list for #( o8q9sp::x: xERRORLENGTH#-MACRO-(`m3+(4B$06 +( `7Z4B-"7 +- ,-,8,8= g-,`13-,7",ou `;d.. "p`c XJ (2QH0@`,<,87@g`u[g ..p $ B`-,/:pZgA@` Bg+4/.]jW,x:C?#-MACRO-DATALIST%"E'<x<<xMACROy =w<xU:]*UDOVECTORMACROEXPANDED){>xDOVECTOR MACRO{}=xMACROFETCHWrong number args for macroGENTEMP:LOCAL-VARU*U*P1+=FIXNUMDECLARE*NCONCDOLETMACROMEMO0?5B `;0.+D ,D,8,8 ,8g",ouZ`Z[[Z [(Z([,8,8 ,@"`4 $ a ,@ $ a ,@ $ a-,0@`13-,-,1 g~-,2@d1 $A-,-,1 O-, g~-, g~-,1 g~ -,1 $-,-,13-,0`-,1,X-,,X-,@  g-,13-, -,0`-,1*g-,13-,  @0 $B-,-,1 -,3`4Np 8an`d g}-,1 g~-, ;-, @0-,13-, $-,-,0P01+w "3C,X-, g @0-,,X-, -,-,0H1,X-, $D-,/0`K { $ `a,xC{W(0MACAID@@@#ExVECTOR-POSASSQ,8 "-,@i/.,<,83Np +..-, B` "  ZK+[`Q3+-,0@(`%@;` "//.T+ ,C EQUALSI:COMPONENT-EQUAL,8i/.  `i/.S`I,< p2Nw`9 " `G..-,`1 ..p-,,XF4B#P :p+ "+% "/u*/,x4CCLASS-OFSUBSTSI:SUBST-INTO-EXTEND,8@i/... "p`cA0GXC` "2QC`,<0 pS+3 ``w.. 0`.p -, &3 g`a $ `-,/:p`a/ /,x@CMEQUAL->VECTOR-CLASS+INTERNAL-LOSSAGE g!C15BA g "!I+D `!4BD W ` ga,xDg =ADD-METHODFxPc_SUBST->VECTOR-CLASS,X/&HPg (EJxW:].WVECTOR-PRINLENGTH%"E'xxSI:PRINLEVEL-EXCESS%"E'Kx#KKxSI:PRINLENGTH-EXCESS%"E'LxW*U*U...LLxSI:NORMALIZE-STREAMPRINLEVELTYOPRINLENGTHPRINT-OBJECT)0:PRINT-SELF->VECTOR-CLASSs g~i/.:p gM( Bg pX " +q`13.` ,T,8,8K",<+q bs,<,8 ps+m7@`@  +\ ,83",o+] *  J`` 3np+b7DO` 12np` ,e,8,8L3",<+m ,l,8 ..p g}-, *w,8g~3",o:p+V ,q,8,8t,8g~",oK/,x#()#(NPg0:PRINT-SELFQxFLATSIZE-OBJECTFLATSIZE->VECTOR-CLASS,< g~i/.-,7@g+{ gˀ Np( "p Bg `5N}`37@g`` g3.` "'`33` ,8 g}@333",<RB ..-,`3 `,< p5.-,`1 ,`,8 .û g}-,33 3",<R w.ˀ,\ Pp `/-,/.]*U,xg0FLATSIZESxTO-LISTGRCHRCTSPRINT1SPRINT->VECTOR-CLASS@"Ai/.5N`& " +% C,8 0,8g~KoXMT ` $ Wa/,x#()#g(7SPRINTUxU`GFLATSIZEGFLATSIZE->VECTOR-CLASSi/.-,o,<A p2O``_ `5N.+/ û-,+6ˀ 0.p g0 -,V .nw Np`U@ u/,xg`'VxSQUIDP;SXHASHSI:HASH-Q-EXTENDSXHASH->VECTOR-CLASS 0z /$Xg`8u*U*UxSI:DESCRIBE-MAX-LEVEL~%~vTThe vector ~S has ~D elements.w:T Z[\p]]x] xFORMATDESCRIBE->VECTOR-CLASS `2oY+ED!4BE ,D,8,8g33 g|i/. *pKo @KW` "/,x]g (:DESCRIBE^xW<SSTATUS% _ K!CC;Cx;