shallaketemperature()

subroutine clm_lake::shallaketemperature ( real(kind_lake), dimension(1), intent(in) t_grnd, real(kind_lake), dimension(1), intent(inout) h2osno, real(kind_lake), dimension(1), intent(in) sabg, real(kind_lake), dimension(1,-nlevsnow + 1:nlevsoil), intent(in) dz, real(kind_lake), dimension(1,nlevlake), intent(in) dz_lake, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(in) z, real(kind_lake), dimension(1,-nlevsnow+0:nlevsoil), intent(in) zi, real(kind_lake), dimension(1,nlevlake), intent(in) z_lake, real(kind_lake), dimension(1), intent(in) ws, real(kind_lake), dimension(1), intent(in) ks, integer, dimension(1), intent(in) snl, real(kind_lake), dimension(1), intent(inout) eflx_gnet, real(kind_lake), dimension(1), intent(in) lakedepth, real(kind_lake), dimension(1,nlevlake), intent(inout) lake_icefrac, real(kind_lake), dimension(1), intent(inout) snowdp, real(kind_lake), dimension(1), intent(out) eflx_sh_grnd, real(kind_lake), dimension(1), intent(out) eflx_sh_tot, real(kind_lake), dimension(1), intent(out) eflx_soil_grnd, real(kind_lake), dimension(1,nlevlake), intent(inout) t_lake, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) t_soisno, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) h2osoi_liq, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(inout) h2osoi_ice, real(kind_lake), dimension(1), intent(out) savedtke1, real(kind_lake), dimension(1,nlevsoil), intent(in) watsat, real(kind_lake), dimension(1,nlevsoil), intent(in) tksatu, real(kind_lake), dimension(1,nlevsoil), intent(in) tkmg, real(kind_lake), dimension(1,nlevsoil), intent(in) tkdry, real(kind_lake), dimension(1,nlevsoil), intent(in) csol, real(kind_lake), intent(in) dtime, real(kind_lake), dimension(1,-nlevsnow+1:nlevsoil), intent(out) frac_iceold, real(kind_lake), dimension(1), intent(out) qflx_snomelt, integer, dimension(1,-nlevsnow+1:nlevsoil), intent(out) imelt, character(*), intent(inout) errmsg, integer, intent(inout) errflg, real(kind_lake), intent(in) xlat_d, real(kind_lake), intent(in) xlon_d )

private

Parameters

[in]	xlat_d	latitude (degrees)
[in]	xlon_d	longitude (degrees)
[in]	watsat	volumetric soil water at saturation (porosity)
[in]	tksatu	thermal conductivity, saturated soil [W/m-K]
[in]	tkmg	thermal conductivity, soil minerals [W/m-K]
[in]	tkdry	thermal conductivity, dry soil (W/m/Kelvin)
[in]	csol	heat capacity, soil solids (J/m**3/Kelvin)
[in]	t_grnd	ground temperature (Kelvin)
[in,out]	h2osno	snow water (mm H2O)
[in]	sabg	solar radiation absorbed by ground (W/m**2)
[in]	dz	layer thickness for snow & soil (m)
[in]	dz_lake	layer thickness for lake (m)
[in]	z	layer depth for snow & soil (m)
[in]	zi	interface level below a "z" level (m) the other z and dz variables
[in]	z_lake	layer depth for lake (m)
[in]	ws	surface friction velocity (m/s)
[in]	ks	coefficient passed to ShalLakeTemperature for calculation of decay of eddy diffusivity with depth
[in]	snl	negative of number of snow layers
[in,out]	eflx_gnet	net heat flux into ground (W/m**2) at the surface interface
[in]	lakedepth	column lake depth (m)
[in,out]	snowdp	snow height (m)
[in]	dtime	timestep
[out]	eflx_sh_grnd	sensible heat flux from ground (W/m**2) [+ to atm]
[out]	eflx_sh_tot	total sensible heat flux (W/m**2) [+ to atm]
[out]	eflx_soil_grnd	heat flux into snow / lake (W/m**2) [+ = into soil] Here this includes the whole lake radiation absorbed.
[in,out]	t_lake	lake temperature (Kelvin)
[in,out]	t_soisno	soil (or snow) temperature (Kelvin)
[in,out]	h2osoi_liq	liquid water (kg/m2) [for snow & soil layers]
[in,out]	h2osoi_ice	ice lens (kg/m2) [for snow & soil layers]
[in,out]	lake_icefrac	mass fraction of lake layer that is frozen
[out]	savedtke1	top level thermal conductivity (W/mK)
[out]	frac_iceold	fraction of ice relative to the tot water
[out]	qflx_snomelt	snow melt (mm H2O /s)
[out]	imelt	flag for melting (=1), freezing (=2), Not=0 (new)

Definition at line 1598 of file clm_lake.f90.