bare_flux()

subroutine __module_sf_noahmplsm_f90__::bare_flux ( type (noahmp_parameters), intent(in) parameters, integer, intent(in) nsnow, integer, intent(in) nsoil, integer, intent(in) isnow, real (kind=kind_phys), intent(in) dt, real (kind=kind_phys), intent(in) sag, real (kind=kind_phys), intent(in) lwdn, real (kind=kind_phys), intent(in) ur, real (kind=kind_phys), intent(in) uu, real (kind=kind_phys), intent(in) vv, real (kind=kind_phys), intent(in) sfctmp, real (kind=kind_phys), intent(in) thair, real (kind=kind_phys), intent(in) qair, real (kind=kind_phys), intent(in) eair, real (kind=kind_phys), intent(in) rhoair, real (kind=kind_phys), intent(in) snowh, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) dzsnso, real (kind=kind_phys), intent(in) zlvl, real (kind=kind_phys), intent(in) zpd, real (kind=kind_phys), intent(in) z0m, real (kind=kind_phys), intent(in) fsno, real (kind=kind_phys), intent(in) emg, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) stc, real (kind=kind_phys), dimension(-nsnow+1:nsoil), intent(in) df, real (kind=kind_phys), intent(in) rsurf, real (kind=kind_phys), intent(in) lathea, real (kind=kind_phys), intent(in) gamma, real (kind=kind_phys), intent(in) rhsur, integer, intent(in) iloc, integer, intent(in) jloc, real (kind=kind_phys), intent(in) q2, real (kind=kind_phys), intent(in) pahb, 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, integer, intent(in) vegtyp, real (kind=kind_phys), intent(in) fveg, real (kind=kind_phys), intent(in) shdfac, real (kind=kind_phys), intent(in) garea1, real (kind=kind_phys), intent(in) pblhx, integer, intent(in) iz0tlnd, integer, intent(in) itime, integer, intent(in) psi_opt, real (kind=kind_phys), intent(in) ep_1, real (kind=kind_phys), intent(in) ep_2, real (kind=kind_phys), intent(in) epsm1, real (kind=kind_phys), intent(in) cp, ifdef, ccpp )

private

Parameters

[in]	iloc	grid index
[in]	jloc	grid index
[in]	nsnow	maximum no. of snow layers
[in]	nsoil	number of soil layers
[in]	isnow	actual no. of snow layers
[in]	dt	time step (s)
[in]	sag	solar radiation absorbed by ground (w/m2)
[in]	lwdn	atmospheric longwave radiation (w/m2)
[in]	ur	wind speed at height zlvl (m/s)
[in]	uu	wind speed in eastward dir (m/s)
[in]	vv	wind speed in northward dir (m/s)
[in]	sfctmp	air temperature at reference height (k)
[in]	thair	potential temperature at height zlvl (k)
[in]	qair	specific humidity at height zlvl (kg/kg)
[in]	eair	vapor pressure air at height (pa)
[in]	rhoair	density air (kg/m3)
[in]	snowh	actual snow depth [m]
[in]	dzsnso	thickness of snow/soil layers (m)
[in]	zlvl	reference height (m)
[in]	zpd	zero plane displacement (m)
[in]	z0m	roughness length, momentum, ground (m)
[in]	emg	ground emissivity
[in]	stc	soil/snow temperature (k)
[in]	df	thermal conductivity of snow/soil (w/m/k)
[in]	rsurf	ground surface resistance (s/m)
[in]	lathea	latent heat of vaporization/subli (j/kg)
[in]	gamma	psychrometric constant (pa/k)
[in]	rhsur	raltive humidity in surface soil/snow air space (-)
[in]	fsno	snow fraction
[in]	pblhx	pbl height (m)
[in]	q2	mixing ratio (kg/kg)
[in]	pahb	precipitation advected heat - ground net in (w/m2)

Definition at line 4430 of file module_sf_noahmplsm.F90.

References esat(), sfcdif1(), sfcdif2(), sfcdif3(), sfcdif4(), and thermalz0().

Referenced by energy().

Here is the call graph for this function:

Here is the caller graph for this function: