--- trunk/libf/phylmd/raddim.f90 2008/02/27 13:16:39 3 +++ trunk/libf/phylmd/Radlwsw/raddim.f90 2013/07/08 18:12:18 71 @@ -1,13 +1,14 @@ module raddim - ! From phylmd/raddim.*.h, v 1.1.1.1 2004/05/19 12:53:08 + ! From phylmd/raddim.*.h, version 1.1.1.1, 2004/05/19 12:53:08 use dimens_m, only: llm + use dimphy, only: klon implicit none - INTEGER, PARAMETER:: kdlon=41, kflev=llm + INTEGER, PARAMETER:: kdlon = klon, kflev = llm - private llm + private llm, klon end module raddim