--- trunk/dimens_m.f 2014/03/05 14:57:53 82 +++ trunk/dimensions.F 2018/04/19 17:54:55 266 @@ -1,13 +1,15 @@ -module dimens_m +module dimensions ! Model dimensions. implicit none - INTEGER, PARAMETER:: iim = 16 ! number of longitudes - INTEGER, PARAMETER:: jjm = 12 ! number of latitudes - INTEGER, PARAMETER:: llm = 11 ! number of vertical layers - INTEGER, PARAMETER:: ndm = 1 + INTEGER, PARAMETER:: iim = CPP_IIM ! number of longitudes + INTEGER, PARAMETER:: jjm = CPP_JJM ! number of latitudes + + INTEGER, PARAMETER:: llm = CPP_LLM + ! number of vertical layers, should be >= 7, because of nl in cv30_param_m + integer, parameter:: nqmx = 5 ! maximum number of tracers -end module dimens_m +end module dimensions