subroutine __module_sf_noahmplsm_f90__::sfcdif2 |
( |
type (noahmp_parameters), intent(in) | parameters, |
|
|
integer, intent(in) | iter, |
|
|
real (kind=kind_phys), intent(in) | z0, |
|
|
real (kind=kind_phys), intent(in) | thz0, |
|
|
real (kind=kind_phys), intent(in) | thlm, |
|
|
real (kind=kind_phys), intent(in) | sfcspd, |
|
|
real (kind=kind_phys), intent(in) | zlm, |
|
|
integer, intent(in) | iloc, |
|
|
integer, intent(in) | jloc, |
|
|
real (kind=kind_phys), intent(inout) | akms, |
|
|
real (kind=kind_phys), intent(inout) | akhs, |
|
|
real (kind=kind_phys), intent(inout) | rlmo, |
|
|
real (kind=kind_phys), intent(inout) | wstar2, |
|
|
real (kind=kind_phys), intent(inout) | ustar ) |
|
private |