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 |