itd/code/SEAICE_SIZE.h

C $Header: /u/gcmpack/MITgcm/pkg/seaice/SEAICE_SIZE.h,v 1.5 2012/03/06 16:51:21 jmc Exp $
C $Name:  $

#ifdef ALLOW_SEAICE

CBOP
C    !ROUTINE: SEAICE_SIZE.h
C    !INTERFACE:
C #include SEAICE_SIZE.h

C    !DESCRIPTION:
C Contains seaice array-size definition (number of tracers,categories).

C SItrMaxNum :: number of passive tracers to allocate
C MULTDIM    :: number of seaice categories to allocate
CEOP

C-    Maximum Number of categories
      INTEGER MULTDIM
CToM<<<
#ifdef SEAICE_ITD
      PARAMETER (MULTDIM=nITD)
#else
C>>>ToM
      PARAMETER (MULTDIM=7)
CToM<<<
#endif
C>>>ToM

C-    Maximum Number of tracers
      INTEGER SItrMaxNum
      PARAMETER(SItrMaxNum = 3 )

#ifdef ALLOW_AUTODIFF_TAMC
      INTEGER iicekey
      INTEGER nEVPstepMax
      PARAMETER ( nEVPstepMax=180 )
      INTEGER NMAX_TICE
      PARAMETER ( NMAX_TICE=10 )
      INTEGER SOLV_MAX_FIXED
      PARAMETER ( SOLV_MAX_FIXED=500 )
#endif

#endif /* ALLOW_SEAICE */

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	dimitri	1.1	C $Header: /u/gcmpack/MITgcm/pkg/seaice/SEAICE_SIZE.h,v 1.5 2012/03/06 16:51:21 jmc Exp $
2			C $Name: $
3
4			#ifdef ALLOW_SEAICE
5
6			CBOP
7			C !ROUTINE: SEAICE_SIZE.h
8			C !INTERFACE:
9			C #include SEAICE_SIZE.h
10
11			C !DESCRIPTION:
12			C Contains seaice array-size definition (number of tracers,categories).
13
14			C SItrMaxNum :: number of passive tracers to allocate
15			C MULTDIM :: number of seaice categories to allocate
16			CEOP
17
18			C- Maximum Number of categories
19			INTEGER MULTDIM
20	dimitri	1.2	CToM<<<
21			#ifdef SEAICE_ITD
22			PARAMETER (MULTDIM=nITD)
23			#else
24			C>>>ToM
25	dimitri	1.1	PARAMETER (MULTDIM=7)
26	dimitri	1.2	CToM<<<
27			#endif
28			C>>>ToM
29	dimitri	1.1
30			C- Maximum Number of tracers
31			INTEGER SItrMaxNum
32			PARAMETER(SItrMaxNum = 3 )
33
34			#ifdef ALLOW_AUTODIFF_TAMC
35			INTEGER iicekey
36			INTEGER nEVPstepMax
37			PARAMETER ( nEVPstepMax=180 )
38			INTEGER NMAX_TICE
39			PARAMETER ( NMAX_TICE=10 )
40			INTEGER SOLV_MAX_FIXED
41			PARAMETER ( SOLV_MAX_FIXED=500 )
42			#endif
43
44			#endif /* ALLOW_SEAICE */
45
46			CEH3 ;;; Local Variables: ***
47			CEH3 ;;; mode:fortran ***
48			CEH3 ;;; End: ***