subroutine gfdl_cloud_microphys_mod::icloud |
( |
integer, intent(in) |
ktop, |
|
|
integer, intent(in) |
kbot, |
|
|
real, dimension (ktop:kbot), intent(inout) |
tzk, |
|
|
real, dimension (ktop:kbot), intent(in) |
p1, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qvk, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qlk, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qrk, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qik, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qsk, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qgk, |
|
|
real, dimension (ktop:kbot), intent(in) |
dp1, |
|
|
real, dimension (ktop:kbot), intent(in) |
den, |
|
|
real, dimension (ktop:kbot), intent(in) |
denfac, |
|
|
real, dimension (ktop:kbot), intent(in) |
vts, |
|
|
real, dimension (ktop:kbot), intent(in) |
vtg, |
|
|
real, dimension (ktop:kbot), intent(in) |
vtr, |
|
|
real, dimension (ktop:kbot), intent(inout) |
qak, |
|
|
real, intent(in) |
rh_adj, |
|
|
real, intent(in) |
rh_rain, |
|
|
real, intent(in) |
dts, |
|
|
real, intent(in) |
h_var |
|
) |
| |
|
private |