subroutine micro_mg_utils::graupel_rain_riming_snow |
( |
real(r8), dimension(mgncol), intent(inout) |
pracs, |
|
|
real(r8), dimension(mgncol), intent(inout) |
npracs, |
|
|
real(r8), dimension(mgncol), intent(inout) |
psacr, |
|
|
real(r8), dimension(mgncol), intent(in) |
qsic, |
|
|
real(r8), dimension(mgncol), intent(in) |
qric, |
|
|
real(r8), dimension(mgncol), intent(in) |
nric, |
|
|
real(r8), dimension(mgncol), intent(in) |
nsic, |
|
|
real(r8), dimension(mgncol), intent(in) |
n0s, |
|
|
real(r8), dimension(mgncol), intent(in) |
lams, |
|
|
real(r8), dimension(mgncol), intent(in) |
n0r, |
|
|
real(r8), dimension(mgncol), intent(in) |
lamr, |
|
|
real(r8), intent(in) |
dtime, |
|
|
real(r8), dimension(mgncol), intent(out) |
pgracs, |
|
|
real(r8), dimension(mgncol), intent(out) |
ngracs, |
|
|
integer, intent(in) |
mgncol |
|
) |
| |
|
private |