subroutine micro_mg_utils::graupel_collecting_snow |
( |
real(r8), dimension(mgncol), intent(in) |
qsic, |
|
|
real(r8), dimension(mgncol), intent(in) |
qric, |
|
|
real(r8), dimension(mgncol), intent(in) |
umr, |
|
|
real(r8), dimension(mgncol), intent(in) |
ums, |
|
|
real(r8), dimension(mgncol), intent(in) |
rho, |
|
|
real(r8), dimension(mgncol), intent(in) |
lamr, |
|
|
real(r8), dimension(mgncol), intent(in) |
n0r, |
|
|
real(r8), dimension(mgncol), intent(in) |
lams, |
|
|
real(r8), dimension(mgncol), intent(in) |
n0s, |
|
|
real(r8), dimension(mgncol), intent(out) |
psacr, |
|
|
integer, intent(in) |
mgncol |
|
) |
| |
|
private |