shallakehydrology()

subroutine clm_lake::shallakehydrology ( real(kind_lake), dimension(1,nlevlake), intent(in) dz_lake, real(kind_lake), dimension(1), intent(in) forc_rain, real(kind_lake), dimension(1), intent(in) forc_snow, real(kind_lake), dimension(1), intent(inout) begwb, real(kind_lake), dimension(1), intent(in) qflx_evap_tot, real(kind_lake), dimension(1), intent(in) forc_t, logical, dimension(1), intent(in) do_capsnow, real(kind_lake), dimension(1), intent(in) t_grnd, real(kind_lake), dimension(1), intent(in) qflx_evap_soi, real(kind_lake), dimension(1), intent(in) qflx_snomelt, integer, dimension(1,-nlevsnow+1:nlevsoil), intent(in) imelt, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) frac_iceold, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) z, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) dz, real(kind_lake), dimension(1,-nlevsnow+0:nlevsoil), intent(inout) zi, integer, dimension(1), intent(inout) snl, real(kind_lake), dimension(1), intent(inout) h2osno, real(kind_lake), dimension(1), intent(inout) snowdp, real(kind_lake), dimension(1,nlevlake), intent(inout) lake_icefrac, real(kind_lake), dimension(1,nlevlake), intent(inout) t_lake, real(kind_lake), dimension(1), intent(out) endwb, real(kind_lake), dimension(1), intent(out) snowage, real(kind_lake), dimension(1), intent(out) snowice, real(kind_lake), dimension(1), intent(out) snowliq, real(kind_lake), dimension(1), intent(out) t_snow, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) t_soisno, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) h2osoi_ice, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) h2osoi_liq, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) h2osoi_vol, real(kind_lake), dimension(1), intent(out) qflx_drain, real(kind_lake), dimension(1), intent(out) qflx_surf, real(kind_lake), dimension(1), intent(out) qflx_infl, real(kind_lake), dimension(1), intent(out) qflx_qrgwl, real(kind_lake), dimension(1), intent(out) qcharge, real(kind_lake), dimension(1), intent(out) qflx_prec_grnd, real(kind_lake), dimension(1), intent(out) qflx_snowcap, real(kind_lake), dimension(1), intent(out) qflx_snowcap_col, real(kind_lake), dimension(1), intent(out) qflx_snow_grnd_pft, real(kind_lake), dimension(1), intent(out) qflx_snow_grnd_col, real(kind_lake), dimension(1), intent(out) qflx_rain_grnd, real(kind_lake), dimension(1), intent(out) qflx_evap_tot_col, real(kind_lake), dimension(1), intent(out) soilalpha, real(kind_lake), dimension(1), intent(out) zwt, real(kind_lake), dimension(1), intent(out) fcov, real(kind_lake), dimension(1,1:nlevsoil), intent(out) rootr_column, real(kind_lake), dimension(1), intent(out) qflx_evap_grnd, real(kind_lake), dimension(1), intent(out) qflx_sub_snow, real(kind_lake), dimension(1), intent(out) qflx_dew_snow, real(kind_lake), dimension(1), intent(out) qflx_dew_grnd, real(kind_lake), dimension(1), intent(out) qflx_rain_grnd_col, real(kind_lake), dimension(1,nlevsoil) watsat, real(kind_lake), dimension(1,nlevsoil) tksatu, real(kind_lake), dimension(1,nlevsoil) tkmg, real(kind_lake), dimension(1,nlevsoil) tkdry, real(kind_lake), dimension(1,nlevsoil) csol, real(kind_lake), intent(in) dtime, character(*), intent(inout) errmsg, integer, intent(inout) errflg )

private

If snow layers are present over an unfrozen lake, and the top layer of the lake is capable of absorbing the latent heat without going below freezing, the snow-water is runoff and the latent heat is subtracted from the lake.

Parameters

	watsat	volumetric soil water at saturation (porosity)
	tksatu	thermal conductivity, saturated soil [W/m-K]
	tkmg	thermal conductivity, soil minerals [W/m-K]
	tkdry	thermal conductivity, dry soil (W/m/Kelvin)
	csol	heat capacity, soil solids (J/m**3/Kelvin)
[in]	dtime	timestep
[in]	dz_lake	layer thickness for lake (m)
[in]	forc_rain	rain rate [mm/s]
[in]	forc_snow	snow rate [mm/s]
[in]	qflx_evap_tot	qflx_evap_soi + qflx_evap_veg + qflx_tran_veg
[in]	forc_t	atmospheric temperature (Kelvin)
[in]	do_capsnow	true => do snow capping
[in]	t_grnd	ground temperature (Kelvin)
[in]	qflx_evap_soi	soil evaporation (mm H2O/s) (+ = to atm)
[in]	qflx_snomelt	snow melt (mm H2O /s)
[in]	imelt	flag for melting (=1), freezing (=2), Not=0
[in,out]	begwb	water mass begining of the time step
[in,out]	z	layer depth (m)
[in,out]	dz	layer thickness depth (m)
[in,out]	zi	interface depth (m)
[in,out]	snl	number of snow layers
[in,out]	h2osno	snow water (mm H2O)
[in,out]	snowdp	snow height (m)
[in,out]	lake_icefrac	mass fraction of lake layer that is frozen
[in,out]	t_lake	lake temperature (Kelvin)
[in,out]	frac_iceold	fraction of ice relative to the tot water
[out]	endwb	water mass end of the time step
[out]	snowage	non dimensional snow age [-]
[out]	snowice	average snow ice lens
[out]	snowliq	average snow liquid water
[out]	t_snow	vertically averaged snow temperature
[out]	t_soisno	snow temperature (Kelvin)
[out]	h2osoi_ice	ice lens (kg/m2)
[out]	h2osoi_liq	liquid water (kg/m2)
[out]	h2osoi_vol	volumetric soil water (0<=h2osoi_vol<=watsat)[m3/m3]
[out]	qflx_drain	sub-surface runoff (mm H2O /s)
[out]	qflx_surf	surface runoff (mm H2O /s)
[out]	qflx_infl	infiltration (mm H2O /s)
[out]	qflx_qrgwl	qflx_surf at glaciers, wetlands, lakes
[out]	qcharge	aquifer recharge rate (mm/s)
[out]	qflx_prec_grnd	water onto ground including canopy runoff [kg/(m2 s)]
[out]	qflx_snowcap	excess precipitation due to snow capping (mm H2O /s) [+]
[out]	qflx_snowcap_col	excess precipitation due to snow capping (mm H2O /s) [+]
[out]	qflx_snow_grnd_pft	snow on ground after interception (mm H2O/s) [+]
[out]	qflx_snow_grnd_col	snow on ground after interception (mm H2O/s) [+]
[out]	qflx_rain_grnd	rain on ground after interception (mm H2O/s) [+]
[out]	qflx_evap_tot_col	pft quantity averaged to the column (assuming one pft)
[out]	soilalpha	factor that reduces ground saturated specific humidity (-)
[out]	zwt	water table depth
[out]	fcov	fractional area with water table at surface
[out]	rootr_column	effective fraction of roots in each soil layer
[out]	qflx_evap_grnd	ground surface evaporation rate (mm H2O/s) [+]
[out]	qflx_sub_snow	sublimation rate from snow pack (mm H2O /s) [+]
[out]	qflx_dew_snow	surface dew added to snow pack (mm H2O /s) [+]
[out]	qflx_dew_grnd	ground surface dew formation (mm H2O /s) [+]
[out]	qflx_rain_grnd_col	rain on ground after interception (mm H2O/s) [+]

Definition at line 3089 of file clm_lake.f90.

References snowwater().

Here is the call graph for this function: