1 |
C $Header: /u/gcmpack/MITgcm/verification/offline_exf_seaice/code/SEAICE_SIZE.h,v 1.1 2012/03/06 16:53:29 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 |
PARAMETER (MULTDIM=1) |
21 |
|
22 |
C- Maximum Number of tracers |
23 |
INTEGER SItrMaxNum |
24 |
PARAMETER(SItrMaxNum = 3 ) |
25 |
|
26 |
#ifdef ALLOW_AUTODIFF_TAMC |
27 |
INTEGER iicekey |
28 |
INTEGER nEVPstepMax |
29 |
PARAMETER ( nEVPstepMax=180 ) |
30 |
INTEGER NMAX_TICE |
31 |
PARAMETER ( NMAX_TICE=10 ) |
32 |
INTEGER SOLV_MAX_FIXED |
33 |
PARAMETER ( SOLV_MAX_FIXED=500 ) |
34 |
#endif |
35 |
|
36 |
#endif /* ALLOW_SEAICE */ |
37 |
|
38 |
CEH3 ;;; Local Variables: *** |
39 |
CEH3 ;;; mode:fortran *** |
40 |
CEH3 ;;; End: *** |