1 |
module dimens_m |
module dimensions |
2 |
|
|
3 |
! Model dimensions. |
! Model dimensions. |
4 |
|
|
5 |
implicit none |
implicit none |
6 |
|
|
7 |
INTEGER, PARAMETER:: iim = 32 ! number of longitudes |
INTEGER, PARAMETER:: iim = CPP_IIM ! number of longitudes |
8 |
INTEGER, PARAMETER:: jjm = 24 ! number of latitudes |
INTEGER, PARAMETER:: jjm = CPP_JJM ! number of latitudes |
9 |
INTEGER, PARAMETER:: llm = 9 ! number of vertical layers |
|
10 |
INTEGER, PARAMETER:: ndm = 1 |
INTEGER, PARAMETER:: llm = CPP_LLM |
11 |
|
! number of vertical layers, should be >= 7, because of nl in cv30_param_m |
12 |
|
|
13 |
integer, parameter:: nqmx = 5 ! maximum number of tracers |
integer, parameter:: nqmx = 5 ! maximum number of tracers |
14 |
|
|
15 |
end module dimens_m |
end module dimensions |