subroutine __module_sf_noahmplsm_f90__::sfcdif1 |
( |
type (noahmp_parameters), intent(in) | parameters, |
|
|
integer, intent(in) | iter, |
|
|
real (kind=kind_phys), intent(in) | sfctmp, |
|
|
real (kind=kind_phys), intent(in) | rhoair, |
|
|
real (kind=kind_phys), intent(in) | h, |
|
|
real (kind=kind_phys), intent(in) | qair, |
|
|
real (kind=kind_phys), intent(in) | zlvl, |
|
|
real (kind=kind_phys), intent(in) | zpd, |
|
|
real (kind=kind_phys), intent(in) | z0m, |
|
|
real (kind=kind_phys), intent(in) | z0h, |
|
|
real (kind=kind_phys), intent(in) | ur, |
|
|
real (kind=kind_phys), intent(in) | mpe, |
|
|
integer, intent(in) | iloc, |
|
|
integer, intent(in) | jloc, |
|
|
| ifdef, |
|
|
| ccpp ) |
|
private |