subroutine cldmacro::precip3 |
( |
integer, intent(in) |
K, |
|
|
integer, intent(in) |
LM, |
|
|
real, intent(in) |
DT, |
|
|
real, intent(in) |
FRLAND, |
|
|
real, intent(in) |
RHCR3, |
|
|
real, intent(inout) |
QPl, |
|
|
real, intent(inout) |
QPi, |
|
|
real, intent(inout) |
QCl, |
|
|
real, intent(inout) |
QCi, |
|
|
real, intent(inout) |
TE, |
|
|
real, intent(inout) |
QV, |
|
|
real, intent(in) |
mass, |
|
|
real, intent(in) |
imass, |
|
|
real, intent(in) |
PL, |
|
|
real, intent(in) |
dZE, |
|
|
real, intent(in) |
QDDF3, |
|
|
real, intent(in) |
AA, |
|
|
real, intent(in) |
BB, |
|
|
real, intent(in) |
AREA, |
|
|
real, intent(out) |
RAIN, |
|
|
real, intent(out) |
SNOW, |
|
|
real, intent(inout) |
PFl_above, |
|
|
real, intent(inout) |
PFi_above, |
|
|
real, intent(inout) |
EVAP_DD_above, |
|
|
real, intent(inout) |
SUBL_DD_above, |
|
|
real, intent(out) |
REVAP_DIAG, |
|
|
real, intent(out) |
RSUBL_DIAG, |
|
|
real, intent(out) |
ACRLL_DIAG, |
|
|
real, intent(out) |
ACRIL_DIAG, |
|
|
real, intent(out) |
PFL_DIAG, |
|
|
real, intent(out) |
PFI_DIAG, |
|
|
real, intent(out) |
VFALLRN, |
|
|
real, intent(out) |
VFALLSN, |
|
|
real, intent(inout) |
FRZ_DIAG, |
|
|
real, intent(in) |
ENVFC, |
|
|
real, intent(in) |
DDRFC, |
|
|
real, intent(in) |
AF, |
|
|
real, intent(in) |
CF, |
|
|
real, intent(in) |
PCBL, |
|
|
integer, intent(in) |
i |
|
) |
| |
|
private |