subroutine, private noahmp_glacier_routines::rosr12_glacier |
( |
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) | p, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) | a, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) | b, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) | c, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) | d, |
|
|
real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(inout) | delta, |
|
|
integer, intent(in) | ntop, |
|
|
integer, intent(in) | nsoil, |
|
|
integer, intent(in) | nsnow ) |
|
private |