subroutine module_sf_mynn::psi_hogstrom_1996 | ( | real(kind_phys), intent(out) | psi_m, |
real(kind_phys), intent(out) | psi_h, | ||
real(kind_phys), intent(in) | zL, | ||
real(kind_phys), intent(in) | Zt, | ||
real(kind_phys), intent(in) | Z_0, | ||
real(kind_phys), intent(in) | Za | ||
) |