Parent Directory | Revision Log
Make procedures writehist and writedynav as identical as possible. Remove output of phis in writedynav: already in histins and constant. Add output of temp and q in writehist. Remove unused variable ndm of module dimens_m. Remove unused variables kftd, mvar, jcfil and jcfllm of module paramet_m.
1 | guez | 3 | module dimens_m |
2 | |||
3 | ! Model dimensions. | ||
4 | |||
5 | implicit none | ||
6 | |||
7 | guez | 24 | INTEGER, PARAMETER:: iim = 16 ! number of longitudes |
8 | INTEGER, PARAMETER:: jjm = 12 ! number of latitudes | ||
9 | guez | 195 | |
10 | INTEGER, PARAMETER:: llm = 11 | ||
11 | ! number of vertical layers, should be >= 7, because of nl in cv30_param_m | ||
12 | |||
13 | guez | 24 | integer, parameter:: nqmx = 5 ! maximum number of tracers |
14 | guez | 3 | |
15 | end module dimens_m |
ViewVC Help | |
Powered by ViewVC 1.1.21 |