Parent Directory | Revision Log
Change all `.f` suffixes to `.f90`. (The opposite was done in revision 82.) Because of change of philosopy in GNUmakefile: we already had a rewritten rule for `.f`, so it does not make the makefile longer to replace it by a rule for `.f90`. And it spares us options of makedepf90 and of the compiler. Also we prepare the way for a simpler `CMakeLists.txt`.
1 | guez | 265 | module dimensions |
2 | guez | 3 | |
3 | ! Model dimensions. | ||
4 | |||
5 | implicit none | ||
6 | |||
7 | guez | 266 | INTEGER, PARAMETER:: iim = CPP_IIM ! number of longitudes |
8 | INTEGER, PARAMETER:: jjm = CPP_JJM ! number of latitudes | ||
9 | guez | 195 | |
10 | guez | 266 | INTEGER, PARAMETER:: llm = CPP_LLM |
11 | guez | 195 | ! 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 | guez | 265 | end module dimensions |
ViewVC Help | |
Powered by ViewVC 1.1.21 |