ragrb()

subroutine, private module_sf_noahmplsm::ragrb ( type (noahmp_parameters), intent(in)  parameters, integer, intent(in)  iter, real (kind=kind_phys), intent(in)  vai, real (kind=kind_phys), intent(in)  rhoair, real (kind=kind_phys), intent(in)  hg, real (kind=kind_phys), intent(in)  tah, real (kind=kind_phys), intent(in)  zpd, real (kind=kind_phys), intent(in)  z0mg, real (kind=kind_phys), intent(in)  z0hg, real (kind=kind_phys), intent(in)  hcan, real (kind=kind_phys), intent(in)  uc, real (kind=kind_phys), intent(in)  z0h, real (kind=kind_phys), intent(in)  fv, real (kind=kind_phys), intent(in)  cwp, integer, intent(in)  vegtyp, real (kind=kind_phys), intent(in)  mpe, real (kind=kind_phys), intent(in)  tv, real (kind=kind_phys), intent(inout)  mozg, real (kind=kind_phys), intent(inout)  fhg, real (kind=kind_phys), intent(inout)  fhgh, integer, intent(in)  iloc, integer, intent(in)  jloc, real (kind=kind_phys)  ramg, real (kind=kind_phys)  rahg, real (kind=kind_phys)  rawg, real (kind=kind_phys)  rb  )

private

Parameters

[in]	iloc	grid index
[in]	jloc	grid index
[in]	iter	iteration index
[in]	vegtyp	vegetation physiology type
[in]	vai	total lai + stem area index, one sided
[in]	rhoair	density air (kg/m3)
[in]	hg	ground sensible heat flux (w/m2)
[in]	tv	vegetation temperature (k)
[in]	tah	air temperature at height z0h+zpd (k)
[in]	zpd	zero plane displacement (m)
[in]	z0mg	roughness length, momentum, ground (m)
[in]	hcan	canopy height (m) [note: hcan >= z0mg]
[in]	uc	wind speed at top of canopy (m/s)
[in]	z0h	roughness length, sensible heat (m)
[in]	z0hg	roughness length, sensible heat, ground (m)
[in]	fv	friction velocity (m/s)
[in]	cwp	canopy wind parameter
[in]	mpe	prevents overflow error if division by zero
[in,out]	mozg	monin-obukhov stability parameter
[in,out]	fhg	stability correction
[in,out]	fhgh	stability correction, canopy
	ramg	aerodynamic resistance for momentum (s/m)
	rahg	aerodynamic resistance for sensible heat (s/m)
	rawg	aerodynamic resistance for water vapor (s/m)
	rb	bulk leaf boundary layer resistance (s/m)

Referenced by vege_flux().

Here is the caller graph for this function: