subroutine gfdl_cloud_microphys_mod::fall_speed |
( |
integer, intent(in) | ktop, |
|
|
integer, intent(in) | kbot, |
|
|
real, dimension (ktop:kbot), intent(in) | den, |
|
|
real, dimension (ktop:kbot), intent(in) | qs, |
|
|
real, dimension (ktop:kbot), intent(in) | qi, |
|
|
real, dimension (ktop:kbot), intent(in) | qg, |
|
|
real, dimension (ktop:kbot), intent(in) | ql, |
|
|
real, dimension (ktop:kbot), intent(in) | tk, |
|
|
real, dimension (ktop:kbot), intent(out) | vts, |
|
|
real, dimension (ktop:kbot), intent(out) | vti, |
|
|
real, dimension (ktop:kbot), intent(out) | vtg ) |
|
private |