-
Notifications
You must be signed in to change notification settings - Fork 0
/
dimensions.h
executable file
·58 lines (57 loc) · 2.21 KB
/
dimensions.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
c-----------------------------------------------------------------------------
c --- START OF REGION AND TILING SPECIFIC PARAMETERS
c --- See: README.src.newregion for more details.
c
c --- itdm = total grid dimension in i direction
c --- jtdm = total grid dimension in j direction
c --- kdm = grid dimension in k direction
integer itdm,jtdm,kdm
parameter (itdm=500,jtdm=382,kdm=32) ! GLBT0.72
c
c --- iqr = maximum number of tiles in i direction
c --- jqr = maximum number of tiles in j direction
integer iqr,jqr
parameter (iqr=10,jqr=10) ! multiple tiles (TYPE=ompi or mpi or shmem)
c
c --- idm = maximum single tile grid dimension in i direction
c --- jdm = maximum single tile grid dimension in j direction
integer idm,jdm
* parameter (idm=itdm,jdm=jtdm) ! always works if enough memory
parameter (idm= 250,jdm= 191) ! NMPI=4,8,16,24,32,40,47,64
c
c --- mxthrd= maximum number of OpenMP threads
integer mxthrd
parameter (mxthrd=1) ! NOMP=0,1
c
c --- kkwall= grid dimension in k direction for wall relax arrays
c --- kknest= grid dimension in k direction for nest relax arrays
integer kkwall,kknest
parameter (kkwall= 1) ! must be 1 or kdm
parameter (kknest= 1) ! must be 1 or kdm
c
c --- kkmy25= grid dimension in k direction for M-Y 2.5 arrays
integer kkmy25
parameter (kkmy25= -1) ! must be -1 or kdm
c
c --- nlgiss= size of lookup table for GISS
integer nlgiss
parameter (nlgiss= 1) ! must be 1 (no GISS) or 762
c
c --- mxtrcr= maximum number of tracers
integer mxtrcr
parameter (mxtrcr=1)
c
c --- natm = number of saved atmospheric fields
integer natm
parameter (natm=2) ! must be 2 (high freq.) or 4 (monthly)
c --- nsteps_baclin = maximum baroclinic steps per day
integer nsteps_baclin
parameter (nsteps_baclin =1440) !one minute or longer time step
c
c --- nsteps_batrop = maximum barotropic steps per baroclinic time step
integer nsteps_batrop
parameter (nsteps_batrop = 128)
c
c
c --- END OF REGION AND TILING SPECIFIC PARAMETERS
c-----------------------------------------------------------------------------