;"I(U*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading EXTMAC 190pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071EXTMAC190VERSIONU*U.UPUSHFUNCTIONLAMBDAXORFILE-EXIT-FUNCTIONS        xGETSUBLOADU:UjuLOADLISP xMACAIDFASL xERRCK xANDU*]*UFEATURECOMPLRSPECIALSI:EXTSTR-SETUP-CLASSESxBOUNDPOBJECT-CLASSCLASS-CLASSVECTOR-CLASSU+UjuSTRUCT-CLASSSTRUCT=INFO-CLASSSEQUENCE-CLASSxSI:EXTEND-Q-OVERHEADxxFLUSH-MACROMEMOSU:UjUSI:EXTEND-CLASS-OFMACROEXPANDEDxSI:EXTEND-CLASS-OF MACROMACROxMACROFETCHLENGTHWrong number args for macroU*TERRORCXRMACROMEMOSUBR,85B ` 1N+ ,,8,8 ,8g",<H Z`[-, $-, $-,2 & $ ` /,x]:] @ SI:EXTEND-MARKER-OF!xSI:EXTEND-MARKER-OF MACRO!!x,85B@" `1N+ ,,8,8,8g", @2<Z`[-, $"-, $00-, &! $ ` /,x%kT  forget-macromemos|"xSI:XREF SETF-X-ACCESS,8[*,8 0-,,X-, $-,/0.T,x0 SI:XSETSI:XREF SETF-X-INVERT[ "-,d $ -, $-, $#-,jUj,x@ ( SI:XREFSI:XREF SETF-XSETF-X$%%xSETF-STRUCT,8-,0[Z[Z [ (*,8-,0@" $ -,,X* & $$ "#uju/*&P %SI:DEF-INITIAL-EXTEND-STRUCT&xSI:DEF-INITIAL-EXTEND-STRUCT MACRO&'x:U*U*U-INSTANCE-SIZESYMBOLCONC-SI:CLASS-SLOT-ACCESSORLASTDECLAREEVALCOMPILEEVAL-WHENP*NCONC,<,85Bk `0.@ +6 ,6,8,8m,8g",<Z`[ Z[Z ,8m,8,8,8 ,>,8@ 00,8,8n,8,8n",<(,8,8,8 "`,87@g~+Y[g~,8(B{6 +E[` B` ,J,8,8g|,8o@,8g{,8o,8g}",<( g|..,8g| Np@ 2 *p)z {v*`-, `-, $ -,)z O&4xV,8 g-, $-,0`-,,X-,,Xg}/ XC` `*Zg~ B` Dg~ Jg|+A gd/,8 g-, $-, 0-, $*-,*g}-, g (-, $-,-,++z Pz-,2@` $,-,-, g}-, d $,X,+z ?-, $>-,<z EEDF$DF6Dz a|+U-, $?-, &C ] $ ` /,x@ :DEFCLASS*u:U*UGxDEFCLASS* MACROGGxunknown option - DEFCLASS*w:U*UHHIIJJpKKxK xDEFVARLISTINFILEFILEPTRUENAMENAMESTRINGUbSI:DEFCLASS*-1*APPEND,85B `0.+O0 ,O,8,8,8g",<Z`[Z[Z [(Z(,8,8,8,8,8@ 4BZ4BX(B{ an+Z g~-,0 Bg~,87@`+f[`0BE+_Z` [ Dg}+d ,d,8,8Zg[-,0@[g-,,8",<Z`ZA@ B`+Z/7@`+k `-,   $K-,-,+k "*g~-,2@  $-,*`-, $-,0` g~,8 "L-,*g~-, 1 $-,,8 LM4By LM`0N-, $-,-,,X 0-, g~-,,X-,,X -, $N-,-, $*g~AHO+z ?**LEXPRDEFUNADD-METHODD,85B< `0.+ , ,8`,8=,8g",<Z`[[Z[ Z Z([([ ,8Z,8,8,8B0,8(F{7 + g-,+ g,8 ,,8[,8,8>,8",H<(,8-, $Q-,-, @0 $*-, g},8 "-, g~ 2-, g|-, g-, $Q -,,8,8 "`,87@g}+5`[g}-, $-,,8 g}-,2@0 $-,,8 g{-,,X @0-,,X-, $R-,-,0XC`Zg} B` Dg}+( g/e,X-,,X-,+z ?ERROR-OUTPUTWxWW x*:TRUTHWxWW x*:VAX-PRIMITIVE-TYPESXxU*U*UPAIRSYMBOLFIXNUMFLONUMVECTORSTRINGBITSCHARACTERCONSTANTU*UjuEXTENDVECTOR-SMSUBRFLONUM-SSMALL-FLONUMXXXYYZZ[[\\]] ^^_xTYPECASEQ_xTYPECASEQ MACROu*U*U_`x~&;Warning: LIST keyword in TYPECASEQ clU*U*wause -- ~  Converting to PAIR~%`aabbccddeeffggphhxu*U*Uh xFORMATMEMQ: ~S non-primitive type in TYPU;] ECASEQ~%`aijjkkllmpmmxm xLSPSRC;EXTMAC 190_4[`0BL+\ 4 ,[,8,8W,8d",<h "XQC` XD ![`i5Bc ,b,8,8W,8e[g~,8E`"",<h+c "/,xhm] `VWLSPSRC;EXTMAC 190_3 $ `O B`zw)54Bm W1B +m[`0D+m " QC`[` @ 0B +p `-,+x(B{7 B@+s[`-,+t $[`O,8 0 $n,,XQC` `-,/0.T,x hVePTR-TYPEPCASEQ,85B ` 0.+ ,,8,8 ,8g",<@Z`[Z,8,8 $n*,H B` g-, $o-,,X-,2@d $o-,/ &_ $ ` :u /,x yMETHOD-NEXTpxMETHOD-NEXT MACROp 0ppx,85B `1N+ ,@,8,8,8g",<Z`[-, d $-, $-, &p $ ` :u /,x  METHOD-SYMBOLqxMETHOD-SYMBOL MACROp 0qqx,85B% `1N+ , @,8,8&,8g",<Z`[-, d $"-, $-, &q $ ` :u /,x METHOD-FUNrxMETHOD-FUN MACROp 0rrx,85B3 `1N+- ,-@,8,84,8g",<Z`[-, d $-, $-, &r $ ` :u /,x( 'METHOD-FUN-SYMsxMETHOD-FUN-SYM MACROp 0ssx,85B@ `1N+; ,;@,8,8A,8g",<Z`[-, d $/-, $-, &s $ ` :u /,x8 4DEFSFAtxDEFSFA MACROu*U*WttxCONS-A--SFA-HANDLERCAR:SEND*DELQSFA-DATAwxpw*U*Uxxxx xGENTEMP:INITSI:DEFSFA-CREATORDEFSFA-NAMEDEFSFA-INITPPUTPROPDEFSFA-SIZEU*U*UDEFSFA-HANDLERDEFSFA-INITSDEFSFA-IDXSI:DEFSFA-ACCESSORDEF-OR-AUTOLOADABLESI:INIT-SFAEXTSFASFA-UNCLAIMED-MESSAGESEND-ASU*U*UMACLISP-PRIMITIVE-CLASSDESETQSFA-CALLWHICH-OPERATIONSPRINTDELETEAPPENDFBOUNDPSI:WHICH-OPERATIONS-INTERNALD,85B `0.+H ,H,8`,8,8g",<Z`[Z[[ Z [Z[ ,8Z [,8Z,8,8,8,8,8 ,U,8,8,8@ ",<(,8 ,X,8,8g},8 ",<( ,8 $v g}, $ "vwvz 5yW3Q,,8 ,`,8,8 ",<y g~,8!E 2 "yi,<!zz {e%b,8 g~-, $-,zz w>hB,8 g{-, g}-,2@ $-,,87@g+r g{-,2J $-,{z (tn,8Zg~[-,0H ,X-, ${-,+t {z Rig#` g{-, $-,,8 g{(d|z 7>k&G-, gz-, $-,( 2|z 7Mxp,8 g|-, gz-, $-,}z {SIg#,8 gz-, gy-,2@` $-,,8,8,8 "`,87@gx+[gx,87@ " (B{ Z0BL+ [` D` , ,8,8gv`P,8!,8g~",<(:p}z (^ieg Bg~ "p-,0H( g~-, $-,~z <:r$b,8`0 g}-, $-,-,,X@-,/XC` `*Zgx B`@ 0 Dgx+ g/,X-, g 0-, g-, g~-, g~ P2-, g}-,~z ;bK-,~zz t{ e P2-,~~z 0:d-,~z Y"t-,~]z 2:V P2-,*z jd\|-,++z Pz-, $,`-,,8 g|-, gw-,` gz-,,8,8 "`,8,8gv@7@`+@[`,8Z[(B{7 @0+; gy-,Z`[-,-,0 @0Z`Z-, $?-,-,0@a [`-,-,+< "/0`XCg g*Z` Bg D`+//0@0 g/,8 g{-, gv`-,,8 gz-,,X-, ` $-,,8,8 "`,87@gu0+Z[gu,8Z[(B{6 +V gy-,Z`[-,-,HZ`Z-, $?-,-, [`-,-,+V "/ XC` `*Zgu B` Dgu+I g/0 0,8 gz-, gu-, gx  -, $-,-, $ -,00-, $,XO gu-,  2 $o-,-,,X-, $vd-,,8 gz-, $-,( @2z 2-c,8 gx-, $-, $J -,-,z nl(f-, $-,0d-,,X-, $-,H,8 gy-, $-,-, d,X-,z Gy0XA-, $>-, 2-, $-,*gz-, $H-,-, $-,*gw-,2@0 $-,,8 gz-,,X @0-, gx-, $-,-,2@ $y-,*gz-, gu-,0H gx-, $-,-,  0 $ -,-, gz-, gw 0-, gz-,,X-, $@ @0,XO gv-, $o-,-,0@ ,X-, g{-, $Q-,0e-,,X-,+z ?