frictionvelocity()

subroutine clm_lake::frictionvelocity ( integer, dimension(1), intent(in)  pgridcell, real(kind_lake), dimension(1), intent(in)  forc_hgt, real(kind_lake), dimension(1), intent(in)  forc_hgt_u, real(kind_lake), dimension(1), intent(in)  forc_hgt_t, real(kind_lake), dimension(1), intent(in)  forc_hgt_q, integer, intent(in)  lbp, integer, intent(in)  ubp, integer, intent(in)  fn, integer, dimension(fn), intent(in)  filterp, real(kind_lake), dimension(lbp:ubp), intent(in)  displa, real(kind_lake), dimension(lbp:ubp), intent(in)  z0m, real(kind_lake), dimension(lbp:ubp), intent(in)  z0h, real(kind_lake), dimension(lbp:ubp), intent(in)  z0q, real(kind_lake), dimension(lbp:ubp), intent(in)  obu, integer, intent(in)  iter, real(kind_lake), dimension(lbp:ubp), intent(in)  ur, real(kind_lake), dimension(lbp:ubp), intent(in)  um, real(kind_lake), dimension(lbp:ubp), intent(out)  ustar, real(kind_lake), dimension(lbp:ubp), intent(out)  temp1, real(kind_lake), dimension(lbp:ubp), intent(out)  temp2, real(kind_lake), dimension(lbp:ubp), intent(out)  temp12m, real(kind_lake), dimension(lbp:ubp), intent(out)  temp22m, real(kind_lake), dimension(1), intent(out)  u10, real(kind_lake), dimension(1), intent(out)  fv, real(kind_lake), dimension(lbp:ubp), intent(inout)  fm  )

private

Parameters

[in]	pgridcell	pft's gridcell index
[in]	forc_hgt	atmospheric reference height (m)
[in]	forc_hgt_u	observational height of wind [m]
[in]	forc_hgt_t	observational height of temperature [m]
[in]	forc_hgt_q	observational height of humidity [m]
[in]	ubp	pft array bounds
[in]	fn	number of filtered pft elements
[in]	filterp	pft filter
[in]	displa	displacement height (m)
[in]	z0m	roughness length over vegetation, momentum [m]
[in]	z0h	roughness length over vegetation, sensible heat [m]
[in]	z0q	roughness length over vegetation, latent heat [m]
[in]	obu	monin-obukhov length (m)
[in]	iter	iteration number
[in]	ur	wind speed at reference height [m/s]
[in]	um	wind speed including the stablity effect [m/s]
[out]	ustar	friction velocity [m/s]
[out]	temp1	relation for potential temperature profile
[out]	temp12m	relation for potential temperature profile applied at 2-m
[out]	temp2	relation for specific humidity profile
[out]	temp22m	relation for specific humidity profile applied at 2-m
[out]	u10	10-m wind (m/s) (for dust model)
[out]	fv	friction velocity (m/s) (for dust model)
[in,out]	fm	needed for DGVM only to diagnose 10m wind