@JTGLMSK 12-SEP-1996 21:15DEC Fortran V6.2-508 $DATA$$BSS$($IODATA$i$CODE$$LINK$(JJTGLMSK SYS$TRNLNM SYS$GETTIM SYS$GETSYIWQSUB DFOR$EXITFINDACEQADDREPLENT0J0JTPRTSYI DFOR$WRITE_SEQ_FMT DFOR$HANDLER DFOR$WRITE_SEQ_FMT_XMIT(JT KGETKI H=0(6 Your system string is:\7 =#~ ^(^0~8G#G4G "G P2_Jq JQFPTG  !v>HpSJ0D D "  BR" "$AG $ 19JpJ0F$ G "$A2GJ`H@F$A  , "1" "0! B4 8 <?$! =B"]&"H""=G="]" b "GBb@Zk " 8F "11" BDR2CJXbSF@G8 GqG ⦔8KvJG" "Y:v^KvSJVGY ¦" b۲ "! 0G bS2YJq JQFS ?" 5Jq JF "1"  "  "TG ¦v;Kz@KzGv " "0vJvSJF "! B2 bs" tG  19JuJ5F e ⦴8K`HG  " BZ# b[  ¦ " "4GBb@Zk "4GGG bs" "GGBb@Zk " " "1" BR"tG0B8b@Zk @"4GBb@Zk r,?$P! @ " "D1" BR"tGpBxb@Zk "4G "  B R@N b s`N C@s C@r 0B ¦ ֢" 8Fq X " B\Z b[ ` " d " BhR bS &W"4B ¦ m'x#7B " BZ0'){#:[C @ "!r,&P"!0@ "1 BR&s"2SB U  ¦֢Fh"4GBb@Zk  "!D`"4GBb@Zk  "!D"4GBb@Zk  "!S " "1" BR"tG0B8b@Zk F"4GBb@Zk@ ]#? 0 " "1" BR"tG`Bhb@Zk $ "T ?&W1"B BX bsm&xΔ"tB \u ¦֢0&)"B `ز "9r,_'PZ#:C bd; ?$! @ "hp"x"" BDR" bs"GBb@Zk T ?$! @8 GG ](]0}8@#k#~H^P^XcG#GG"<0J`HF< "<Q2v^J`SH@F<Q "@""DGD !9Hr@J2DD  D01'J`H FD0 "LBR"PP"TG"T0J`HFT  BT21v>J`SH FT2 "X""\G\ !9Hr@J2D\ e \01'J`H F\0  "dBR"hP"lp೐"t᳐"4G@BHb@Zk"(4GGGb<s""GGPBXb@Zk"(""1"BR"tGBb@Zk"4G`Bhb@Zk4?$! @ "1K _&R"2Bb$3Q&답"¦֢BB, }?'r9#BZCCb0"!$~ 0@ @B4Pb"G¦ "@ݶ8="G_&R"8"HG`Bhb@Zk@"", 8"8]"tG0B8b@Zk@""0 8"8]"tG0B8b@ZkX""4 8"8]"tG0B8b@ZkcGH]P]X`#k#~^^~ G#GGG "!1?J`H F! P2v^J`SH@FP  " "1" 0G  !9Hr@J2D  01'J`H F0  " BR" P "TG "0J`HF  B21v>J`SH F2  " " " G   !9Hr@J2D  e  01'J`H F 0  " BR" P "   "$ "4GBb@Zk "4GGG bs" "GGBb@Zk " r,?&P1"B B" "1" BR"tGpBxb@Zk "4G " BR@N bs`N Cs Cr 0B  ¦֢"㢹4'#7B "CK '{#:[C @#Q&" "1!1@!0@ B2 c}&r" 3uB3tB ¦v&~" "98C7C b_'&Z# "1 @ @  "!_&WR"2@ 5 m&xs"B ¦v "90')#8C  b{r,?&P1"qC B : &"@ B(" "" BR" bs"GBb@ZkG]]} 0#k4@GL SYS$TRNLNM 4Db# SYS$TRNLNM4H@L SYS$TRNLNM40G< SYS$GETTIM44b# SYS$GETTIM48@< SYS$GETTIM4 lGx SYS$GETSYIW4 pb# SYS$GETSYIW4 t@x SYS$GETSYIW, GQSUB,b#QSUB, @QSUB4 G DFOR$EXIT4 b# DFOR$EXIT4 @ DFOR$EXIT,GFINDACE,b#FINDACE,@FINDACE4 |G DFOR$EXIT4 b# DFOR$EXIT4 @ DFOR$EXIT4 G DFOR$EXIT4 b# DFOR$EXIT4 @ DFOR$EXIT4 G DFOR$EXIT4 b# DFOR$EXIT4 @ DFOR$EXIT, G QSUB,b#QSUB, @ QSUB4 4G@ DFOR$EXIT4 8b# DFOR$EXIT4 <@@ DFOR$EXIT,tGQADD,xb#QADD,|@QADD,8GDREPLENT,<b#REPLENT,@@DREPLENT48 GD SYS$GETTIM4< b#0 SYS$GETTIM4@ @D SYS$GETTIM4 t G SYS$GETSYIW4 x b#0 SYS$GETSYIW4 | @ SYS$GETSYIW,  G QSUB, b#0QSUB,  @ QSUB4  G DFOR$EXIT4  b#0 DFOR$EXIT4  @ DFOR$EXIT< G DFOR$WRITE_SEQ_FMT< b#0DFOR$WRITE_SEQ_FMT< @ DFOR$WRITE_SEQ_FMT< G DFOR$WRITE_SEQ_FMT_XMIT< b#0DFOR$WRITE_SEQ_FMT_XMIT< @ DFOR$WRITE_SEQ_FMT_XMIT< G DFOR$WRITE_SEQ_FMT_XMIT< b#0DFOR$WRITE_SEQ_FMT_XMIT< @ DFOR$WRITE_SEQ_FMT_XMIT<, G8 DFOR$WRITE_SEQ_FMT_XMIT<0 b#0DFOR$WRITE_SEQ_FMT_XMIT<4 @8 DFOR$WRITE_SEQ_FMT_XMIT4 G SYS$GETTIM4 b# SYS$GETTIM4 @ SYS$GETTIM4 D GP SYS$GETSYIW4 H b# SYS$GETSYIW4 L @P SYS$GETSYIW, G FINDACE, b#FINDACE, @ FINDACE,hGtREPLENT,lb#REPLENT,p@tREPLENT =TPFINDACEREPLENT=\@ SYS$TRNLNM= LNM$SYSTEM_TABLEp SYS$GETTIM SYS$GETSYIW DFOR$EXIT=0 ;=@ \; QSUB= 8SYE$_SPLCRSMDL=BOGUSQADD=( (WX=0H;=` 7 DFOR$HANDLER=(DFOR$WRITE_SEQ_FMT_XMIT= x;= =  DFOR$WRITE_SEQ_FMT=0T ;=( 0 !+ C=3+*JTGLMSKDEC Fortran V6.2-508 = 44= JTGLMSK4=p 0  $= (4 := d4=  = 404=JTPRTSYI4=JBA  - $= 4 := 4 4=  = T 44= KGETKIT 4=RJI 10 d $= | 4 := p4= < =