@JTSPAWN 5-OCT-1996 10:54DEC Fortran V6.2-508  $DATA$$BSS$$IODATA$i $CODE$z$LINK$(JJTSPAWNLIB$SYS_TRNLOG LIB$SPAWN JRT1_SUB_INIT JRT2_SUB_INIT JRT3_SUB_INIT JRT1_SUB_PUT JRT1_SUB_GETLIB$WAIT JRT2_SUB_PUT JRT2_SUB_GET JRT3_SUB_PUT JRT3_SUB_GETOTS$STRCMP_EQLP ,6  = #~ ^(^0~8@HG#GGG$,$H,=TG= "!C@NCR@8DE& """=$  "" "1"]"tG@BHb@Zk " 0F "  B R$@ bsF8kF` F8F &5vJB "9#>"GGGGGGBb@Zk "  GGBb@ZkXDE?$ ! =""=&s"} "" "1"]"tG@BHb@Zk " 0F "  B R$@ bsF8kF` F8F &5vJB "9#>"GGGGGGBb@Zk "  GGBb@ZkxDE?$ ! =""=&s"} "" "1"]"tG@BHb@Zk " 0F "  B R$@ bsF8kF` F8F &5vJB "9#>"GGGGGGBb@Zk "  GCGBb@ZkL4GC 8Fe "1_&1v J2B="4GPBXb@Zk$ (""4GPBXb@Zk "&" BR"]" " BR"tGBb@Zk  "!TG "B"GB@Zk. 7TG "B"GB@ZkGG  "991 C "!  "4GBb@Zk$ `""4GPBXb@ZkGBb@Zk4GG#X De ?&0vJB"4GBb@Zk$ (""4GBb@ZkG "&" BR"]" " BR"tG`Bhb@Zk  "!TG "B"GB@Zk. 7TG "B"GB@ZkGG  "991 C "!  "4GBb@Zk$ `""4GBb@ZkGBb@Zk4GGi#x De ?&0vJB"4GpBxb@Zk$ (""4GpBxb@ZkG "&" BR"]" " BR"tGpBxb@Zk  "!TG "B"GB@Zk. 7TG "B"GB@ZkGG%  "991 C "!  "4GBb@Zk$ `""4GpBxb@ZkGBb@Zk4GGGG ](]0}8@HP#kD.R DJAF4GLIB$SYS_TRNLOG4b#LIB$SYS_TRNLOG4@LIB$SYS_TRNLOG4 \Gh LIB$SPAWN4 `b# LIB$SPAWN4 d@h LIB$SPAWN4G JRT1_SUB_INIT4b# JRT1_SUB_INIT4@ JRT1_SUB_INIT4GLIB$SYS_TRNLOG4b#LIB$SYS_TRNLOG4@LIB$SYS_TRNLOG4 |G LIB$SPAWN4 b# LIB$SPAWN4 @ LIB$SPAWN4G JRT2_SUB_INIT4b# JRT2_SUB_INIT4@ JRT2_SUB_INIT4GLIB$SYS_TRNLOG4b#LIB$SYS_TRNLOG4@LIB$SYS_TRNLOG4 G LIB$SPAWN4 b# LIB$SPAWN4 @ LIB$SPAWN4G JRT3_SUB_INIT4b# JRT3_SUB_INIT4@ JRT3_SUB_INIT4G$ JRT1_SUB_PUT4b# JRT1_SUB_PUT4 @$ JRT1_SUB_PUT4@GL JRT1_SUB_PUT4Db# JRT1_SUB_PUT4H@L JRT1_SUB_PUT 4 4G JRT1_SUB_GET4b# JRT1_SUB_GET4@ JRT1_SUB_GET4 GOTS$STRCMP_EQLP4 @OTS$STRCMP_EQLP4 GOTS$STRCMP_EQLP4 @OTS$STRCMP_EQLP40G<LIB$WAIT44b#LIB$WAIT48@<LIB$WAIT4\Gh JRT1_SUB_PUT4`b# JRT1_SUB_PUT4d@h JRT1_SUB_PUT4lGx JRT1_SUB_INIT4pb# JRT1_SUB_INIT4t@x JRT1_SUB_INIT4 G JRT2_SUB_PUT4 b# JRT2_SUB_PUT4 @ JRT2_SUB_PUT4 G JRT2_SUB_PUT4 b# JRT2_SUB_PUT4 @ JRT2_SUB_PUT4$G0 JRT2_SUB_GET4(b# JRT2_SUB_GET4,@0 JRT2_SUB_GET4 XG`OTS$STRCMP_EQLP4 \@`OTS$STRCMP_EQLP4 GOTS$STRCMP_EQLP4 @OTS$STRCMP_EQLP4GLIB$WAIT4b#LIB$WAIT4@LIB$WAIT4 G JRT2_SUB_PUT4 b# JRT2_SUB_PUT4 @ JRT2_SUB_PUT4 G JRT2_SUB_INIT4b# JRT2_SUB_INIT4@ JRT2_SUB_INIT4XGd JRT3_SUB_PUT4\b# JRT3_SUB_PUT4`@d JRT3_SUB_PUT4G JRT3_SUB_PUT4b# JRT3_SUB_PUT4@ JRT3_SUB_PUT4G JRT3_SUB_GET4b# JRT3_SUB_GET4@ JRT3_SUB_GET4 GOTS$STRCMP_EQLP4 @OTS$STRCMP_EQLP4  G(OTS$STRCMP_EQLP4 $@(OTS$STRCMP_EQLP4pG|LIB$WAIT4tb#LIB$WAIT4x@|LIB$WAIT4G JRT3_SUB_PUT4b# JRT3_SUB_PUT4@ JRT3_SUB_PUT4G JRT3_SUB_INIT4b# JRT3_SUB_INIT4@ JRT3_SUB_INIT  JRT2_SUB_GET JRT3_SUB_GET= GCY$SPWN10 JRT2_SUB_INIT JRT1_SUB_INIT=@` JRT2_SUB_PUT=NG LIB$SPAWN=OK8OTS$STRCMP_EQLP=0 ;=P< ;= write sys$output "OK"LIB$SYS_TRNLOG JRT1_SUB_PUT= $stop/id=0 JRT3_SUB_PUTLIB$WAIT;@ JRT3_SUB_INIT JRT1_SUB_GET= GCY$SPWN3p= GCY$SPWN2 C=3+*JTSPAWNDEC Fortran V6.2-508 = 44= JTSPAWN4=̨̨̨( $= 44 := 4=  =