/[MITgcm]/MITgcm/verification/seaice_itd/code/SEAICE_SIZE.h
ViewVC logotype

Diff of /MITgcm/verification/seaice_itd/code/SEAICE_SIZE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by mlosch, Tue May 27 15:26:04 2014 UTC revision 1.3 by mlosch, Tue Jun 24 08:00:16 2014 UTC
# Line 12  C    !DESCRIPTION: Line 12  C    !DESCRIPTION:
12  C Contains seaice array-size definition (number of tracers,categories).  C Contains seaice array-size definition (number of tracers,categories).
13    
14  C SItrMaxNum :: number of passive tracers to allocate  C SItrMaxNum :: number of passive tracers to allocate
15  C nITD       :: number of seaice categories to allocate  C MULTDIM    :: number of seaice categories to allocate
16  CEOP  CEOP
17    
18  C-    Maximum Number of categories  C-    Maximum Number of categories
19          INTEGER MULTDIM
20        INTEGER nITD        INTEGER nITD
21  C--  C--
22  #ifdef SEAICE_ITD  #ifdef SEAICE_ITD
# Line 23  CToM<<< Line 24  CToM<<<
24  C nITD defines number of ice thickness categories,  C nITD defines number of ice thickness categories,
25  C i.e. size of additional dimension to AREA, HEFF, HSNOW, etc.  C i.e. size of additional dimension to AREA, HEFF, HSNOW, etc.
26  C Bitz et al. (2001, JGR) suggest a minimum of nITD = 5  C Bitz et al. (2001, JGR) suggest a minimum of nITD = 5
27        PARAMETER (nITD = 5)        PARAMETER(nITD = 7)
28          PARAMETER (MULTDIM=nITD)
29  C>>>ToM  C>>>ToM
30  #else  #else
31        PARAMETER (nITD = 7)  c     PARAMETER (MULTDIM=7)
32          PARAMETER (MULTDIM=1)
33          PARAMETER(nITD = MULTDIM)
34  #endif  #endif
35    
36  C-    Maximum Number of tracers  C-    Maximum Number of tracers

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.22