modv_MAXJL.F

Go to the documentation of this file.

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

C> This module declares and initializes the MAXJL 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_maxjl

C>        @var maxjl
C>        Maximum number of entries in the internal jump/link table.

#ifdef STATIC_ALLOCATION
      INTEGER, PARAMETER :: maxjl = 96000
#else
      INTEGER :: MAXJL = 84000
#endif

    END MODULE