BLOCK DATA 
 
      INTEGER  DTX 
      INTEGER  STX 
      COMMON   /STEMP/  DTX 
      COMMON   /STEMP/  STX 
      DATA     DTX    /0/ 
      DATA     STX    /0/ 
      END