C
      CHARACTER STMNAM*9,STMID*3,RSMC*4
C
      LOGICAL FSTFLG
C
      DIMENSION STMNAM(MAXSTM),STMLAT(MAXSTM),STMLON(MAXSTM),
     1          STMDIR(MAXSTM),STMSPD(MAXSTM),IDATE(MAXSTM),
     2          IUTC(MAXSTM),RMAX(MAXSTM),PENV(MAXSTM),PCEN(MAXSTM),
     3          PTOP(MAXSTM),RSMC(MAXSTM),RMW(MAXSTM),VMAX(MAXSTM),
     4          R15NW(MAXSTM),R15NE(MAXSTM),R15SE(MAXSTM),R15SW(MAXSTM),
     5          STMID(MAXSTM),FSTFLG(MAXSTM),FCSTP(MAXSTM),
     6          R26NW(MAXSTM),R26NE(MAXSTM),R26SE(MAXSTM),R26SW(MAXSTM),
     7          FCLAT(MAXSTM),FCLON(MAXSTM)
C