subroutine, private module_sf_noahmplsm::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(out) |
ustar |
|
) |
| |
|
private |