subroutine __module_sf_noahmplsm_f90__::groundalb |
( |
type (noahmp_parameters), intent(in) | parameters, |
|
|
integer, intent(in) | nsoil, |
|
|
integer, intent(in) | nband, |
|
|
integer, intent(in) | ice, |
|
|
integer, intent(in) | ist, |
|
|
real (kind=kind_phys), intent(in) | fsno, |
|
|
real (kind=kind_phys), dimension(1:nsoil), intent(in) | smc, |
|
|
real (kind=kind_phys), dimension(1: 2), intent(in) | albsnd, |
|
|
real (kind=kind_phys), dimension(1: 2), intent(in) | albsni, |
|
|
real (kind=kind_phys), intent(in) | cosz, |
|
|
real (kind=kind_phys), intent(in) | tg, |
|
|
integer, intent(in) | iloc, |
|
|
integer, intent(in) | jloc, |
|
|
real (kind=kind_phys), dimension(1: 2), intent(out) | albgrd, |
|
|
real (kind=kind_phys), dimension(1: 2), intent(out) | albgri ) |
|
private |