subroutine, private noahmp_glacier_routines::sfcdif1_glacier |
( |
integer, intent(in) | iter, |
|
|
real (kind=kind_phys), intent(in) | zlvl, |
|
|
real (kind=kind_phys), intent(in) | zpd, |
|
|
real (kind=kind_phys), intent(in) | z0h, |
|
|
real (kind=kind_phys), intent(in) | z0m, |
|
|
real (kind=kind_phys), intent(in) | qair, |
|
|
real (kind=kind_phys), intent(in) | sfctmp, |
|
|
real (kind=kind_phys), intent(in) | h, |
|
|
real (kind=kind_phys), intent(in) | rhoair, |
|
|
real (kind=kind_phys), intent(in) | mpe, |
|
|
real (kind=kind_phys), intent(in) | ur, |
|
|
| ifdef, |
|
|
| ccpp ) |
|
private |