subroutine, private noahmp_glacier_routines::csnow_glacier |
( |
integer, intent(in) |
isnow, |
|
|
integer, intent(in) |
nsnow, |
|
|
integer, intent(in) |
nsoil, |
|
|
real, dimension(-nsnow+1: 0), intent(in) |
snice, |
|
|
real, dimension(-nsnow+1: 0), intent(in) |
snliq, |
|
|
real, dimension(-nsnow+1:nsoil), intent(in) |
dzsnso, |
|
|
real, dimension(-nsnow+1: 0), intent(out) |
tksno, |
|
|
real, dimension(-nsnow+1: 0), intent(out) |
cvsno, |
|
|
real, dimension(-nsnow+1: 0), intent(out) |
snicev, |
|
|
real, dimension(-nsnow+1: 0), intent(out) |
snliqv, |
|
|
real, dimension(-nsnow+1: 0), intent(out) |
epore |
|
) |
| |
|
private |