10 |
integer lllmm1, lllmp1, lcl |
integer lllmm1, lllmp1, lcl |
11 |
REAL dtvr ! time step for dynamics (in s) |
REAL dtvr ! time step for dynamics (in s) |
12 |
real, parameter:: daysec = 86400. ! number of seconds per day |
real, parameter:: daysec = 86400. ! number of seconds per day |
13 |
REAL dtphys |
REAL dtphys ! time step of integration |
14 |
real, parameter:: rad = 6371229. ! radius of the Earth (in m) |
real, parameter:: rad = 6371229. ! radius of the Earth (in m) |
15 |
real r |
real r |
16 |
real, parameter:: cpp = 1004.70885 ! J K-1 kg-1 |
real, parameter:: cpp = 1004.70885 ! J K-1 kg-1 |