setemis()

subroutine, public module_radiation_surface::setemis	(	integer, intent(in)	lsm,
		integer, intent(in)	lsm_noahmp,
		integer, intent(in)	lsm_ruc,
		logical, intent(in)	frac_grid,
		logical, intent(in)	cplice,
		logical, dimension(:), intent(in)	use_flake,
		real (kind=kind_phys), dimension(:), intent(in)	lakefrac,
		real (kind=kind_phys), dimension(:), intent(in)	xlon,
		real (kind=kind_phys), dimension(:), intent(in)	xlat,
		real (kind=kind_phys), dimension(:), intent(in)	slmsk,
		real (kind=kind_phys), dimension(:), intent(in)	snodl,
		real (kind=kind_phys), dimension(:), intent(in)	snodi,
		real (kind=kind_phys), dimension(:), intent(in)	sncovr,
		real (kind=kind_phys), dimension(:), intent(in)	sncovr_ice,
		real (kind=kind_phys), dimension(:), intent(in)	zorlf,
		real (kind=kind_phys), dimension(:), intent(in)	tsknf,
		real (kind=kind_phys), dimension(:), intent(in)	tairf,
		real (kind=kind_phys), dimension(:), intent(in)	hprif,
		real (kind=kind_phys), dimension(:), intent(inout)	semis_lnd,
		real (kind=kind_phys), dimension(:), intent(inout)	semis_ice,
		real (kind=kind_phys), dimension(:), intent(inout)	semis_wat,
		integer, intent(in)	IMAX,
		real (kind=kind_phys), dimension(:), intent(in)	fracl,
		real (kind=kind_phys), dimension(:), intent(in)	fraco,
		real (kind=kind_phys), dimension(:), intent(in)	fraci,
		logical, dimension(:), intent(in)	icy,
		real (kind=kind_phys), dimension(:), intent(out)	semisbase,
		real (kind=kind_phys), dimension(:), intent(out)	sfcemis
	)

Parameters

xlon	(IMAX), longitude in radiance, ok for both 0->2pi or -pi -> +pi ranges
xlat	(IMAX), latitude in radiance, default to pi/2 -> -pi/2 range, otherwise see in-line comment
snodl	(IMAX), snow depth water equivalent in mm land
snodi	(IMAX), snow depth water equivalent in mm ice
sncovr	(IMAX), snow cover over land
zorlf	(IMAX), surface roughness in cm
tsknf	(IMAX), ground surface temperature in K
tairf	(IMAX), lowest model layer air temperature in K
hprif	(IMAX), topographic standard deviation in m
IMAX	array horizontal dimension
sfcemis	(IMAX), surface emissivity

setemis General Algorithm

1. Set emissivity by surface type and conditions

• Check for snow covered area. it is assume here that "sncovr" is the fraction of land covered by snow and "sncovr_ice" is the fraction of ice coverd by snow

References epsln, f_one, f_zero, idxems, iemslw, imxems, jmxems, rad2dg, and set_soilveg_ruc_mod::set_soilveg_ruc().

Referenced by gfs_radiation_surface::gfs_radiation_surface_run().

Here is the call graph for this function:

Here is the caller graph for this function: