/[MITgcm]/MITgcm/verification/offline_exf_seaice/code_ad/SEAICE_SIZE.h
ViewVC logotype

Diff of /MITgcm/verification/offline_exf_seaice/code_ad/SEAICE_SIZE.h

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

revision 1.3 by gforget, Mon Mar 25 02:39:33 2013 UTC revision 1.4 by mlosch, Tue May 27 15:26:04 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 MULTDIM    :: number of seaice categories to allocate  C nITD       :: number of seaice categories to allocate
16  CEOP  CEOP
17    
18  C-    Maximum Number of categories  C-    Maximum Number of categories
19        INTEGER MULTDIM        INTEGER nITD
20  C--  C--
21  #ifdef SEAICE_ITD  #ifdef SEAICE_ITD
22  CToM<<<  CToM<<<
23  C nITD defines number of ice thickness categories,  C nITD defines number of ice thickness categories,
24  C i.e. size of additional dimension to AREA, HEFF, HSNOW, etc.  C i.e. size of additional dimension to AREA, HEFF, HSNOW, etc.
25  C Bitz et al. (2001, JGR) suggest a minimum of nITD = 5  C Bitz et al. (2001, JGR) suggest a minimum of nITD = 5
26        INTEGER nITD        PARAMETER (nITD = 7)
       PARAMETER(nITD = 7)  
       PARAMETER (MULTDIM=nITD)  
27  C>>>ToM  C>>>ToM
28  #else  #else
29  c     PARAMETER (MULTDIM=7)        PARAMETER (nITD = 1)
       PARAMETER (MULTDIM=1)  
30  #endif  #endif
31    
32  C-    Maximum Number of tracers  C-    Maximum Number of tracers
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22