; P@QU*]*USETQCDMACSVERNOQUOTE40xDEFUNCOMPDECLAREMACROLU*U*USPECIALACSMODEARGLOCARGNOARITHPARRAYOPENASSEMBLEATPLATPL1U*U*UBVARSCAAGLCARCDRCCLOAD:INITIAL-PROPSCDUMPCFVFLCHOMPHOOKCLCLEANUPSPLU*U*UCLOSEDCLPROGNCMSGFILESCNTCOBARRAYCOMALCOMAUXVERNOCOMPCOMPILATION-FLAGCONVERSION-TABLEU*U*UCOMPILER-STATECOMPLRVERNOCONDPCONDPNOBCONDTYPECONDUNSFCREADTABLECTAGDATAU*U*UDISOWNEDEFFSEOC-EVALEOF-COMPILE-QUEUEEOF-SEENERRFLEXITEXITNEXLDLU*U*UEXPAND-OUT-MACROSEXPR-HASHEXTEND-FILES-TO-LOADFASLFASLPUSHFBARPFILEPOSIBLEFILESCLOSEPFIXSWU*U*UFLOSWFLPDLFXPDLGAG-ERRBREAKSGENPREFIXGFYCGLGOBRKLGOFOOU*U*UGONE2HLACHUNK2-TO-CONSIDENTITYIGNOREVARSIMOSARINFILEINITIALIZEINITIAVERNOU*U*UINMLSINSTACKIOBARRAYIREADTABLEKTYPEL-END-CNTLAP-INSIGNIFLAPLLLAPOFU*U*ULDLSTLERSTP+1LINELLINEMODEPLMBPLOCVARSLOUTLOUT1LPASST-FXPU*U*ULPASST-P+1LPRSLMACROLISTMACROSMAKLAP-DEFAULTF-STYLEMAKLAPVERNOMAKUNBOUNDMAPEXMAPSBU*U*UMCX-TRACEMODELISTMSDEVMSDIRMUZZLEDNEW-EXTEND-FILES-TO-LOADNLNVSNLNVTHTBPNOLAPU*U*UNULFUNUMACSOLVRLONMLSOPSYSOPVRLOUTFILESP1CCXP1CSQU*U*UP1GFYP1LLP1LLCEKP1LSQP1PCXP1PSQP1SPECIALIZEDVSP2PPHAS1VERNOU*U*UPKTYPPNOBPRATTSTACKPROGNPROGPPROGTYPEPROGUNSFPRSSLPVRU*U*UPVRLQSMQUIT-ON-ERRORREADRECOMPLREGACSREGPDLRNLROSENCEKU*U*URUNTIME-LIMITRUNTIME-LIMITPSAIL-MORE-SYSFUNSSAVED-ERRLISTSFLGSLOTXSOBARRAYSPECIALSSPECVARSU*U*USPLDLSTSPLITFILE-HOOKSQUIDSREADTABLESTATESTSLSWITCHLISTSWITCHTABLESYMBOLSU*U*UTAKENAC1TOPFNTTYNOTESTYOUNDFUNSUNFASLCOMMENTSUNSFLSTUREADUSE-STRT7U*U*UUSERATOMS-HOOKSUSERATOMS-INTERNUSERATOMS-INTERN-FROBUSER-STRING-MARK-IN-FASLUWRITEVGOVGOLVLYESWARNTTYU*U*U*FEXPR*EXPR*LEXPRARRAY*CGOLEREADEVAL-WHENFIXNUMFLONUMU*U*UMAKLAPNOTYPEUNSPECIALACBASEBESTCNTBESTLOCIBASEIU*U*UIIMNNARGSNLARGNOACSP1CNTRSTNOVALACU*U*UCOM-AREFCC0CLLOCCOML1COMLCCOMARRAYCONVNUMLOCFRACFRAC1U*U*UFRAC5FRACBFREENUMAC0FREENUMAC1FREENUMACFREEREGACLOADINREGACLOADINSOMENUMACLOADINNUMACU*U*UOUTFUNCALLP1TRESSZTYIUNSAFEPELOADUGREAT1PNAMECONCEOPENAPPLYU*U*USUBSTBOLA STGETCBAPVIAU*U*UA1S1A?AC-ADDRS PDL-ADDRSU*]*UTGENSYMCOMMENT       !#%')+-/13579;=? A!C"E#G$I%K&M'O(Q)S*U+W,Y-[.]/_0a1c2e3g4i5k6m7o8q9s:u;w<y={>}?@ABCDEFGHIJKLMNO PQRSTUVWXYZ[\]^[_`abOc dbefIg.hijkblmnobpqrstbuv _ %6i?BPwx y`z{|}~~xFASLDECLAREALLATOMSAMBIGSYMSATOMINDEXU*U*UBINCTCURRENTFNCURRENTFNSYMSDDTSYMPDDTSYMSENTRYNAMESEXPRFASLEVALFASLVERNOU*U*UFILOCFSLFLDIMOBFLIMOUSRLASTENTRYLDFNMLITCNTLITERALPLITERALSU*U*ULITLOC*LOCMAINSYMPDLMESSIOCSQUIDPSYMBOLSPSYMPDLUFFILUNDEFSYMSU*U*UUNFASLSIGNIF*DDTSYMARGSINFOBLOBLENGTHBUFFERBINCOLLECTATOMSFASLDEFSYMFASLDIFFFASLINITU*U*UFASLMAINFASLMINUSFASLNEGLISFASLPASS1FASLPASS2FASLPLUSINDENT-TO-INSTACKLAPCONSTLISTOUTU*U*ULREMPROPMAKEWORDMESOUTMOBYSYMPOPMSOUTMUNGEABLEREMPROPLSUBMATCHRECLITCOUNTU*U.ULCABSARNUMBERTABLEBTARBXAR        M!io#%'X%_)+-/ 13579;=? Ab+!  `C}"E#bG$5 xFLUSH-MACROMEMOSOUTFSu+U*PI%xDEFPROPOUTFS MACROK%&xOUT3FIELDSOUT4FIELDSOUT5FIELDSSUBRZ[Z[Z [(Z([ Z[,8,8*-,1d $ -, g~-, M-,@ 0`1%*-,1 $ -, g~`@a-, $(-, $'-,`1`*-,1 $ -, g~-,d $(-,3-, O-,uju,x`(NCDRIQxNCDR MACROKQ)xNTHCDRZ[Z[*-,1 $-,2A:u S-,,x(3EQUIVI*xEQUIV MACROu(K*UxNULLCONDZ[Z[ ",8 2-,1,X-,@-,1 $+@`-,-,1-,1 $-, .W W-,,x((2^N-PI,x2^N-P MACROK,YxU(2-BOOLEZEROPZ[-,1 $-@ -,-,1,X-, $-,2@d [-,-,1 $.-,kUjP,xH()INVERSE-ASCIII]xINVERSE-ASCII MACROK]/xGETCHARNZPd [_z g$f-, $0-,,xp(c Oh, FOO!IaxOh, FOO! MACROKa1xOUTPUTFOOc2zP,x(5 ITSPIexITSP MACROKe3xEQITSgy4zTr },x0(6W+TP]SAILPIixSAILP MACROKi5xSAILgykzrA =,xP(7DEC10Pu:J WI6xDEC10P MACROK6mxDEC10gy7z',xh(8DEC20PIoxW)!:uDEC20P MACROKo8xDEC20gyqz'#,x(9BARFI9xBARF MACROpK9sxZ[Z[Z [(Z([H*,8-,1 -,@-,0J1 $ -,9z *NFQ-, $-,d ,X-, $-,,x(:W+@DBARFI:xDBARF MACROK:uxZ[Z[Z  [(Z([*,8-,1 -,0@(@-,1 $ -,z jO1-,0@  $-,,X-, $-,0.].,x((GWARNI;xWARN MACROK;wxZ[Z[Z [(Z([*,8-,2@1 -,@-,1 $ -,2A@;z JNHQ-, $-,,X-,2A:u $-,,x8(TPDERRI<xPDERR MACROuK<yxZ[Z[@,8-,2J1 -,=z i-,,X-,2A:u $-,,xH(aKNOW-ALL-TYPESI{xKNOW-ALL-TYPES MACROu(2K{>xMEMQNOTZ[-,1 $+ P-,z :w-,bz 04>|3-,2@` }-,-,1@-,1(`2z ,Lu-, }-,-,1 $?@`-,-,1-,13-,`0,X-, W-,,x]:\P]`(iINITIALSLOTSIxINITIALSLOTS MACROK@xz &2,x(zERL-SETu:U*(IxERL-SET MACROKAxORMEMBERERRLISTPUSHB%NC%zi0,x ({SETUP-CATCH-PDL-COUNTSIxSETUP-CATCH-PDL-COUNTS MACROKDx [c=1zp:*,x@(|W+TP]CLEARALLACSIExCLEARALLACS MACROKExCLEARACS0Fz0XV},xX(}NO-DELAYED-SPLDSu:TP]IxNO-DELAYED-SPLDS MACROKGxCSLDCCSLDHz>s'LE,xp(~MAX-NPUSHu9!:uIxMAX-NPUSH MACROKIx}z{Zu,x(MAX-0PUSHIxMAX-0PUSH MACROu.WKJxz{Zu,x (MAX-0*0PUSHIKxMAX-0*0PUSH MACROKKx z{Zu,x8(NACSILxNACS MACROKLxMz;Zu ,xH(NUMVALACIxNUMVALAC MACROKNx{zv%,x`(W+J WNUMNACSIxNUMNACS MACROKOx~zv#,xp(NACS+1IxW.WNACS+1 MACROKPx=zv%,x(FXP0IxFXP0 MACROKQxRBujuxz;Zq,x(FLP0IRxFLP0 MACROKRxp Sz;Zm,x((NPDL-ADDRSIxNPDL-ADDRS MACROKTx`z{ZuAkUj,x@(REGADP-NIUxREGADP-N MACROKUxLESSPZ[(d{z 3-, -, $V-,kUjU,xX( REGACPIxREGACP MACROKWxGSIGNP<PdANDZ[-,1 -,   $X-,{z 3*`-, -,0d-,1,X-, $Y-,,xp(REGACP-NIxREGACP-N MACROKZxZ[{z 3 @0-, -, $V-,,x]:\( (REGPDLP-NIxREGPDLP-N MACROK[xZ[_z g$f-,@d  -, $V-,,x0(7W+U REGPDLPIxREGPDLP MACROK\xLE>Z[d@e-,1 -, $X-,z g$e|`0*`-, $]-,-,1,X W-, $Y-,,x@( PDLLOCPIxWdPDLLOCP MACROK^xZ[-,1 -, .W $X-,,x`(SPDLLOCP-NIxPDLLOCP-N MACROK_x @0Z[z '$f-, $]-,-,2A:u1 $?-,,xp([ACLOCPIxACLOCP MACROp @2K`xZ[-,1 -, $Xujp-,,x(eACLOCP-NIxACLOCP-N MACROKaxZPd [z '$f-, $]-,,x(mW+@NUMACPIxNUMACP MACROKbxZ[-,1 e -, $X-,{z 3*`-,2@d -,-,1 $?-, @0-,1,X-, $Y-,,x]:\( (:NUMACP-NIxNUMACP-N MACROKcxZ[{z 3-,2@d -,-,1 $?-,kU`,x0(ENUMPDLPIxNUMPDLP MACROKdxZ[d@e-,1 -, $X-,z g$e|`2*`-, $]-,-,1 $?@ -,-,1,X-, $Y-,0.].,x@(JNUMPDLP-NIxNUMPDLP-N MACROKexZ[(`2z g$e|-, $]-,-,1 $?ujp-,,xP(UFLPDLP-NIxFLPDLP-N MACROKfxZAH[Sz g$ex-, $]-,-,1 .W $?-,,x`(ZPDLACIxPDLAC MACROKgxU(PFXPPFLPZ[bz FK3-,  ` g-,z >z-,*`-,1  e $+-,hz yz-,z ~"D=$-,`],X-, W-,,xp(_PDLGETu8PIixPDLGET MACROKixZ[bz FK3-,  ` g-,Az 8zz-,*`-,1  e $+-,Kz .vt-, z x1-,`],X-, W-,,x(jACSGETPeIjxACSGET MACROKjxZ[;z ֌a-,z qx W-, W-,,x((uACSSLOTIkxW*T(ACSSLOT MACROKkx=CDRCDDRZ[{z 3dPe-, $l-,;z ֌a-,z '$fe*`-, $l-,;z ' |3@-,,X-, .W -,,x8(ILOCFItxILOCF MACROKtxP dFRACFZ[ubz |@o4-, -,,xH(IILOCNIxILOCN MACROKvxZ[bz 0APe W-, -,,x`((FREACBIxW.WFREACB MACROKwxsqzna<U,xp(WFREACIxFREAC MACROKxx(/`sz.a<M,x(Y;