include file: comgdpar.cdk 31
#if defined (DOC)
*     COMMON BLOCKS NEEDED TO:
*
*     1. READ FIELDS STORED INTO RPN STANDARD FILES
*        AND AND DATA STORED INTO CMC ADE BURP FILES.
*     2. OUTPUT TO ANALYSIS FILE.
*
*Revision:
*     .  C. Charette *ARMA/AES Feb 2002
*        Added npakanl
*     .  Y. Yang July 2003
*          - Change  CFSTVAR(7),CFSTVAR2D(7) to CFSTVAR(17),CFSTVAR2D(17)
*            to accommodate more chemical species
*     .  Y.J. Rochon Feb. 2006
*          - Increased dimension of CFSTVAR and CFSTVAR2D to 30.
*          - Added related JPNVARM parameter and comment
*
*-----------------------------------------------------------------------
*
*                  --------   ----------- --------------------------
*                  Analysis   First Guess Initial Mini-    Normalized
*     .                                   misation point   Increment
*                  --------   ----------- --------------------------
*    DATESTAMPS:      *          *            *               *
*   .              NSTAMPA    NSTAMPT      NSTAMPI.        NSTAMPN
*                     *          *            *               *
*    TYPVARS:         *          *            *               *
*   .             CTYPVARA    CTYPVART     CTYPVARI.       CTYPVARN
*                     *          *            *               *
*    ETIQUETTES:      *          *            *               *
*   .             CETIKETA    CETIKETT     CETIKETI        CETIKETN
*
*-----------------------------------------------------------------------
*
*     .    CETIKINC: ETIQUETTE OF ANALYSED INCREMENTS
*     .     NIG    : STORAGE DESCRIPTOR  0: S-N 1: N-S  (..IG2..)
*     .     NITER  : NUMBER OF ITERATIONS               (..IP3..)
*     .     NFSTVAR: NUMBER OF VARIABLES
*     .     CFSTVAR:  NAME OF VARIABLES                (..NOMVAR..)
*     .     CMCRUN : CMC RUN NAME ( 'r112' 'g112' 'g206' etc...)
*     .    NPAKANL : PACKING OF FIELDS IN ANALYSIS FILE (= -nbits)
*                    NPAKANL= -30  (DEFAULT)
*                    NPAKANL= -999 (SAME AS IN TRIAL FIELD FILE)
*
*  Comments:
*
*  - CFSTVAR and CFSTVAR2D dimensions in comgdpar.cdk
*    must be large enough to accomodate number of variables
*    based on JPNVARMAX (see comstate.cdk and sucva.ftn).
*
*    JPNVARMAX (comstate.cdk), JPNVARM (comgdpar.cdk), 
*    INBRVAR3D (and INBRVAR2D; comvarstd.cdk), and NCMTMAX (comdim.cdk)
*    must have consistent sizes!!!
*
#endif
      INTEGER     NIG, NFSTVAR, NFSTVAR2D, NITER
      INTEGER     NSTAMPA, NSTAMPT, NSTAMPI, NSTAMPN
      INTEGER     NIP2A, NIP2T, NIP2I,NIP2N, NPAKANL
      INTEGER     NDEETA, NDEETT, NDEETI, NDEETN
      INTEGER     NPASA, NPAST, NPASI, NPASN
      INTEGER     NIG2A, NIG2T, NIG2I, NIG2N
      integer     NPAKINC, ndtinc
      INTEGER     JPNVARM
      PARAMETER   (JPNVARM=30)
*
      CHARACTER*4 CFSTVAR(JPNVARM),CFSTVAR2D(JPNVARM)
      CHARACTER*4 CMCRUN
      CHARACTER*2 CTYPVARA,CTYPVART,CTYPVARI,CTYPVARN
      CHARACTER*12 CETIKETA,CETIKETT,CETIKETI,CETIKETN
      CHARACTER*12 CETIKINC
*
      COMMON/COMFST3DC/CTYPVARA, CTYPVART, CTYPVARI, CTYPVARN
     +     ,CETIKETA, CETIKETT, CETIKETI, CETIKETN, CMCRUN, CFSTVAR,CFSTVAR2D
     +     ,CETIKINC
      COMMON/COMFST3D/  NSTAMPA,  NSTAMPT,  NSTAMPI, NSTAMPN
     +     , NIP2A, NIP2T, NIP2I, NIP2N, NDEETA, NDEETT, NDEETI, NDEETN
     +     , NPASA, NPAST, NPASI, NPASN, NIG2A, NIG2T, NIG2I, NIG2N
     +     , NIG, NITER, NFSTVAR,NFSTVAR2D,NPAKANL,npakinc,ndtinc
*