14 |
|
|
15 |
integer, parameter:: nl = klev - 1 |
integer, parameter:: nl = klev - 1 |
16 |
! Limit for convection. The maximum number of levels to which |
! Limit for convection. The maximum number of levels to which |
17 |
! convection can penetrate, plus 1. nl must be <= KLEV-1. |
! convection can penetrate, plus 1. We should have: 2 <= nl <= KLEV - 1. |
18 |
|
|
19 |
real sigd ! FRACTIONAL AREA COVERED BY UNSATURATED DNDRAFT |
real sigd ! FRACTIONAL AREA COVERED BY UNSATURATED DNDRAFT |
20 |
real spfac ! FRACTION OF PRECIPITATION FALLING OUTSIDE OF CLOUD |
real spfac ! FRACTION OF PRECIPITATION FALLING OUTSIDE OF CLOUD |