modv_MXDXTS.F

Go to the documentation of this file.

C> @file
C> @brief Declare and initialize MXDXTS variable.

C> This module declares and initializes the MXDXTS variable.
C>
C> <p>For dynamic allocation builds, this variable is initialized
C> to a default value which can be overridden by a subsequent call
C> to function isetprm() within the application program.
C> For static allocation builds, this variable is set as a
C> parameter at compile time and cannot be changed within the
C> application program.
C>
C> @author J. Ator
C> @date 2014-12-10

    MODULE modv_mxdxts

C>        @var mxdxts
C>        Maximum number of dictionary tables that can be stored
C>        for use with BUFR messages in internal memory.

#ifdef STATIC_ALLOCATION
      INTEGER, PARAMETER :: mxdxts = 200
#else
      INTEGER :: MXDXTS = 200
#endif

    END MODULE