C     Include file for PLOTWT.
C
      INTEGER    MSTA, MTIME, INUNIT, MCHAN, SUNIT
      PARAMETER  (MSTA=20)
      PARAMETER  (MTIME=10000)    ! Number of times.
      PARAMETER  (INUNIT=8)
      PARAMETER  (MCHAN=32)
      PARAMETER  (SUNIT=10)
      REAL       MINWT(MTIME,MSTA), MAXWT(MTIME,MSTA)
      REAL       AVGWT(MTIME,MSTA), TIME(MTIME,MSTA)
      REAL       MINCWT(MCHAN,MTIME,MSTA), MAXCWT(MCHAN,MTIME,MSTA)
      REAL       AVGCWT(MCHAN,MTIME,MSTA), TIMEC(MCHAN,MTIME,MSTA)
      REAL       TMIN, TMAX, TMINA, TMAXA, TAVG
      INTEGER    NSTA, NTIME, JDAY1, NCHMAX
      LOGICAL    GOTSUM, WRTSUM
      CHARACTER  STNAME(MSTA)*8, WTFILE*80, PLTFILE*80, EXPNAM*8
      CHARACTER  OUTFILE*80
      COMMON  / PTWD / MINWT, MAXWT, AVGWT, TIME, TMIN, TMAX,
     1           MINCWT, MAXCWT, AVGCWT, TIMEC, 
     2           TMINA, TMAXA, TAVG, NSTA, NTIME, JDAY1, NCHMAX,
     3           GOTSUM, WRTSUM
      COMMON  / PTWC / STNAME, WTFILE, PLTFILE, EXPNAM, OUTFILE
C
C     Variables for reading lines of data.  Put in common to
C     avoid compiler complaints about unused variables.
C
      INTEGER    MWORDS
      PARAMETER  (MWORDS=MCHAN*3+100)
      INTEGER    WLEN(MWORDS), NWORDS
      CHARACTER  WORD(MWORDS)*20
      COMMON / RLNDAT / WLEN, NWORDS
      COMMON / RLNCHR / WORD
C --------------------------------------------------------------