psi_businger_1971()

subroutine module_sf_mynn::psi_businger_1971	(	real, intent(out)	psi_m,
		real, intent(out)	psi_h,
		real, intent(in)	zL
	)