C
C     INCLUDE 'mttwf.inc'
C     Declaration of the common block used in MTT and WFSRF programs:
C
C Date: 2000, November 20
C
C     ------------------------------------------------------------------
      INTEGER NOUT,MOUT
      PARAMETER (MOUT=69)
      CHARACTER*80 FOUT(0:MOUT+1)
      CHARACTER*5 CHOUT(MOUT)
      CHARACTER*5 QNAMES(MOUT)
      COMMON/MTTWFC/ CHOUT,FOUT,QNAMES
      SAVE  /MTTWFC/
      COMMON/MTTWFI/ NOUT
      SAVE  /MTTWFI/
C
C     NOUT .. Number of character strings stored in CHOUT and FOUT.
C     CHOUT . Character strings, describing which quantity is to be
C             interpolated and written into corresponding output
C             file FOUT. The strings are the same as the names of
C             the parameters specifying
C             the names of output files with the interpolated quantities
C             (NUM,MTT,MP1,...).
C     FOUT .. Filenames of the output files corresponding to the
C             individual interpolated quantities.
C
C Coded by Petr Bulant
C
C=======================================================================
C