sfcdif3()

subroutine __module_sf_noahmplsm_f90__::sfcdif3 ( type (noahmp_parameters), intent(in)  parameters, integer, intent(in)  iloc, integer, intent(in)  jloc, integer, intent(in)  iter, real (kind=kind_phys), intent(in)  sfctmp, real (kind=kind_phys), intent(in)  qair, real (kind=kind_phys), intent(in)  ur, real (kind=kind_phys), intent(in)  zlvl, real (kind=kind_phys), intent(in)  tgb, logical, intent(in)  thsfc_loc, real (kind=kind_phys), intent(in)  prslkix, real (kind=kind_phys), intent(in)  prsik1x, real (kind=kind_phys), intent(in)  prslk1x, real (kind=kind_phys), intent(in)  z0m, real (kind=kind_phys), intent(in)  z0h, real (kind=kind_phys), intent(in)  zpd, real (kind=kind_phys), intent(in)  snowh, real (kind=kind_phys), intent(in)  fveg, real (kind=kind_phys), intent(in)  garea1, real (kind=kind_phys), intent(inout)  ustarx, real (kind=kind_phys), intent(inout)  fm, real (kind=kind_phys), intent(inout)  fh, real (kind=kind_phys), intent(inout)  fm2, real (kind=kind_phys), intent(inout)  fh2, real (kind=kind_phys), intent(out)  fv, real (kind=kind_phys), intent(out)  cm, real (kind=kind_phys), intent(out)  ch  )

private

Parameters

[in]	iloc	grid index
[in]	jloc	grid index
[in]	iter	iteration index
[in]	sfctmp	temperature at reference height [K]
[in]	qair	specific humidity at reference height [kg/kg]
[in]	ur	wind speed [m/s]
[in]	zlvl	reference height [m]
[in]	tgb	ground temperature [K]
[in]	thsfc_loc	flag for using sfc-based theta
[in]	prslkix	in exner function
[in]	prsik1x	in exner function
[in]	prslk1x	in exner function
[in]	z0m	roughness length, momentum, ground [m]
[in]	z0h	roughness length, sensible heat, ground [m]
[in]	zpd	zero plane displacement [m]
[in]	snowh	snow depth [m]
[in]	fveg	fractional vegetation cover
[in]	garea1	grid area [km2]
[in,out]	ustarx	friction velocity [m/s]
[in,out]	fm	momentum stability correction, weighted by prior iters
[in,out]	fh	sen heat stability correction, weighted by prior iters
[in,out]	fm2	sen heat stability correction, weighted by prior iters
[in,out]	fh2	sen heat stability correction, weighted by prior iters
[out]	fv	friction velocity (m/s)
[out]	cm	drag coefficient for momentum
[out]	ch	drag coefficient for heat

Definition at line 5452 of file module_sf_noahmplsm.F90.

Referenced by bare_flux(), and vege_flux().

Here is the caller graph for this function: