module_radiation_surface Module Reference

This module sets up surface albedo for SW radiation and surface emissivity for LW radiation.

Functions/Subroutines
subroutine, public	sfc_init (me, errmsg, errflg)
	This subroutine is the initialization program for surface radiation related quantities (albedo, emissivity, etc.) More...
subroutine, public	setalb (slmsk, lsm, lsm_noahmp, lsm_ruc, use_cice_alb, snodi, sncovr, sncovr_ice, snoalb, zorlf, coszf, tsknf, tairf, hprif, frac_grid, lakefrac, alvsf, alnsf, alvwf, alnwf, facsf, facwf, fice, tisfc, lsmalbdvis, lsmalbdnir, lsmalbivis, lsmalbinir, icealbdvis, icealbdnir, icealbivis, icealbinir, IMAX, albPpert, pertalb, fracl, fraco, fraci, icy, sfcalb)
	This subroutine computes four components of surface albedos (i.e., vis-nir, direct-diffused) according to control flag ialbflg. 1) climatological surface albedo scheme ([29]) 2) MODIS retrieval based scheme from Boston univ. More...
subroutine, public	setemis (lsm, lsm_noahmp, lsm_ruc, frac_grid, cplice, use_flake, lakefrac, xlon, xlat, slmsk, snodl, snodi, sncovr, sncovr_ice, zorlf, tsknf, tairf, hprif, semis_lnd, semis_ice, semis_wat, IMAX, fracl, fraco, fraci, icy, semisbase, sfcemis)
	This subroutine computes surface emissivity for LW radiation. More...

Variables
character(40), parameter	vtagsfc ='NCEP-Radiation_surface v5.1 Nov 2012 '
integer, parameter, public	nf_albd = 4
integer, parameter, public	imxems = 360
integer, parameter, public	jmxems = 180
real(kind=kind_phys), parameter, public	f_zero = 0.0
real(kind=kind_phys), parameter, public	f_one = 1.0
real(kind=kind_phys), parameter, public	epsln = 1.0e-6
real(kind=kind_phys), parameter	rad2dg = 180.0 / con_pi
integer, dimension(:,:), allocatable	idxems
integer	iemslw = 1