subroutine module_sf_mynn::psi_dyerhicks | ( | 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 ) |