Functions/Subroutines
integer function, public	load_terrainflg_tables (tflg_file, season)

integer function, public	load_seasonal_desert (file)

integer function, public	load_brdf (brdffile)

subroutine, public	unload_brdf (status)

integer function, public	get_brdfcorr_sr (lat, lon, ra, sa, vza, amf, elev, month, ndvi, stdv, gzone, lc_type, bgaod, sr412, sr470, sr650, use_alternate_brdf, debug)

real function, public	get_aot500 (lat, lon, elev, sa, season, ndvi, gzone, lc_type, stdv02, aot412_91, aot412_93, aot412_94, aot412_96, aot412_995, aot470_91, aot470_92, aot470_93, aot470_94, aot470_95, aot470_96, aot470_995, aot412_91_dust, aot412_93_dust, aot412_94_dust, aot412_96_dust, aot412_995_dust, aot470_91_dust, aot470_92_dust, aot470_93_dust, aot470_94_dust, aot470_95_dust, aot470_96_dust, aot470_995_dust, ae, status, debug)

integer function, public	set_limits (locedge, lat, long)

integer function, public	set_limits6 (locedge, lat, long)

integer function, public	load_hdfler (lut_file, season)

integer function, public	load_swir_coeffs (file, season)

real function, dimension(3), public	get_swir_coeffs412 (latidx, lonidx)

real function, dimension(3), public	get_swir_coeffs470 (latidx, lonidx)

real function, public	get_swir_stderr412 (latidx, lonidx)

real function, public	get_swir_stderr470 (latidx, lonidx)

real function, dimension(2), public	get_swir_range (latidx, lonidx)

real function, public	get_ler865 (latidx, lonidx)

real function, public	get_ler412 (latidx, lonidx, NDVI, scatAngle, relaz)

real function, public	get_ler470 (latidx, lonidx, NDVI, scatAngle, relaz)

real function, public	get_ler650 (latidx, lonidx, NDVI, scatAngle, relaz)

integer function	readswir2 (start, edge, stride, sds_name, grp_id, outref)

integer function	readswir3 (start3, edges3, stride3, sds_name, grp_id, outref)

integer function, public	latlon_to_index_ler (lat, lon, ilat, ilon)

real function, public	get_viirs_ler412 (latidx, lonidx)

real function, public	get_viirs_ler488 (latidx, lonidx)

real function, public	get_viirs_ler670 (latidx, lonidx)

real function, public	get_modis_ler412 (latidx, lonidx)

real function, public	get_modis_ler470 (latidx, lonidx)

real function, public	get_modis_ler650 (latidx, lonidx)

real function, public	get_modis_ler865 (latidx, lonidx)

real function, public	get_viirs_modisbrdf_ler412 (ilat, ilon, ndvi, sa, ra)

real function, public	get_viirs_modisbrdf_ler488 (ilat, ilon, ndvi, sa, ra)

real function, public	get_viirs_modisbrdf_ler670 (ilat, ilon, ndvi, sa, ra)

integer function, public	get_geographic_zone (lat, lon, status)

integer function, public	get_sfc_elev_std (lat, lon, status)

real function, public	get_background_aod (lat, lon, season, status)

Variables
integer, dimension(3600, 1800), public	terrain_flag_new

real, dimension(3600, 1800), public	terrain_flag

real, dimension(3600, 1800), public	sfc_elev_std

Function/Subroutine Documentation

◆ get_aot500()

real function, public modis_surface::get_aot500	(	real, intent(in)	lat,
		real, intent(in)	lon,
		real, intent(in)	elev,
		real, intent(in)	sa,
		integer, intent(in)	season,
		real, intent(in)	ndvi,
		integer, intent(in)	gzone,
		integer, intent(in)	lc_type,
		real, intent(in)	stdv02,
		real, intent(in)	aot412_91,
		real, intent(in)	aot412_93,
		real, intent(in)	aot412_94,
		real, intent(in)	aot412_96,
		real, intent(in)	aot412_995,
		real, intent(in)	aot470_91,
		real, intent(in)	aot470_92,
		real, intent(in)	aot470_93,
		real, intent(in)	aot470_94,
		real, intent(in)	aot470_95,
		real, intent(in)	aot470_96,
		real, intent(in)	aot470_995,
		real, intent(in)	aot412_91_dust,
		real, intent(in)	aot412_93_dust,
		real, intent(in)	aot412_94_dust,
		real, intent(in)	aot412_96_dust,
		real, intent(in)	aot412_995_dust,
		real, intent(in)	aot470_91_dust,
		real, intent(in)	aot470_92_dust,
		real, intent(in)	aot470_93_dust,
		real, intent(in)	aot470_94_dust,
		real, intent(in)	aot470_95_dust,
		real, intent(in)	aot470_96_dust,
		real, intent(in)	aot470_995_dust,
		real, intent(in)	ae,
		integer, intent(inout)	status,
		logical, intent(in), optional	debug
	)

Definition at line 3261 of file modis_surface_nc4.f95.

◆ get_background_aod()

real function, public modis_surface::get_background_aod	(	real, intent(in)	lat,
		real, intent(in)	lon,
		integer, intent(in)	season,
		integer	status
	)

Definition at line 6321 of file modis_surface_nc4.f95.

◆ get_brdfcorr_sr()

integer function, public modis_surface::get_brdfcorr_sr	(	real, intent(in)	lat,
		real, intent(in)	lon,
		real, intent(in)	ra,
		real, intent(in)	sa,
		real, intent(in)	vza,
		real, intent(in)	amf,
		real, intent(in)	elev,
		integer, intent(in)	month,
		real, intent(in)	ndvi,
		real, intent(in)	stdv,
		integer, intent(in)	gzone,
		integer, intent(in)	lc_type,
		real, intent(in)	bgaod,
		real, intent(inout)	sr412,
		real, intent(inout)	sr470,
		real, intent(inout)	sr650,
		logical, intent(in), optional	use_alternate_brdf,
		logical, intent(in), optional	debug
	)

Definition at line 749 of file modis_surface_nc4.f95.

◆ get_geographic_zone()

integer function, public modis_surface::get_geographic_zone	(	real, intent(in)	lat,
		real, intent(in)	lon,
		integer	status
	)

Definition at line 6246 of file modis_surface_nc4.f95.

◆ get_ler412()

real function, public modis_surface::get_ler412	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx,
		real, intent(in)	NDVI,
		real, intent(in)	scatAngle,
		real, intent(in)	relaz
	)

Definition at line 5286 of file modis_surface_nc4.f95.

◆ get_ler470()

real function, public modis_surface::get_ler470	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx,
		real, intent(in)	NDVI,
		real, intent(in)	scatAngle,
		real, intent(in)	relaz
	)

Definition at line 5367 of file modis_surface_nc4.f95.

◆ get_ler650()

real function, public modis_surface::get_ler650	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx,
		real, intent(in)	NDVI,
		real, intent(in)	scatAngle,
		real, intent(in)	relaz
	)

Definition at line 5451 of file modis_surface_nc4.f95.

◆ get_ler865()

real function, public modis_surface::get_ler865	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5268 of file modis_surface_nc4.f95.

◆ get_modis_ler412()

real function, public modis_surface::get_modis_ler412	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6049 of file modis_surface_nc4.f95.

◆ get_modis_ler470()

real function, public modis_surface::get_modis_ler470	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6069 of file modis_surface_nc4.f95.

◆ get_modis_ler650()

real function, public modis_surface::get_modis_ler650	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6089 of file modis_surface_nc4.f95.

◆ get_modis_ler865()

real function, public modis_surface::get_modis_ler865	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6109 of file modis_surface_nc4.f95.

◆ get_sfc_elev_std()

integer function, public modis_surface::get_sfc_elev_std	(	real, intent(in)	lat,
		real, intent(in)	lon,
		integer	status
	)

Definition at line 6284 of file modis_surface_nc4.f95.

◆ get_swir_coeffs412()

real function, dimension(3), public modis_surface::get_swir_coeffs412	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5185 of file modis_surface_nc4.f95.

◆ get_swir_coeffs470()

real function, dimension(3), public modis_surface::get_swir_coeffs470	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5202 of file modis_surface_nc4.f95.

◆ get_swir_range()

real function, dimension(2), public modis_surface::get_swir_range	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5251 of file modis_surface_nc4.f95.

◆ get_swir_stderr412()

real function, public modis_surface::get_swir_stderr412	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5219 of file modis_surface_nc4.f95.

◆ get_swir_stderr470()

real function, public modis_surface::get_swir_stderr470	(	integer, intent(in)	latidx,
		integer, intent(in)	lonidx
	)

Definition at line 5235 of file modis_surface_nc4.f95.

◆ get_viirs_ler412()

real function, public modis_surface::get_viirs_ler412	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 5989 of file modis_surface_nc4.f95.

◆ get_viirs_ler488()

real function, public modis_surface::get_viirs_ler488	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6009 of file modis_surface_nc4.f95.

◆ get_viirs_ler670()

real function, public modis_surface::get_viirs_ler670	(	integer, intent(in)	latidx,
		integer, intent(out)	lonidx
	)

Definition at line 6029 of file modis_surface_nc4.f95.

◆ get_viirs_modisbrdf_ler412()

real function, public modis_surface::get_viirs_modisbrdf_ler412	(	integer, intent(in)	ilat,
		integer, intent(out)	ilon,
		real, intent(in)	ndvi,
		real, intent(in)	sa,
		real, intent(in)	ra
	)

Definition at line 6129 of file modis_surface_nc4.f95.

◆ get_viirs_modisbrdf_ler488()

real function, public modis_surface::get_viirs_modisbrdf_ler488	(	integer, intent(in)	ilat,
		integer, intent(out)	ilon,
		real, intent(in)	ndvi,
		real, intent(in)	sa,
		real, intent(in)	ra
	)

Definition at line 6167 of file modis_surface_nc4.f95.

◆ get_viirs_modisbrdf_ler670()

real function, public modis_surface::get_viirs_modisbrdf_ler670	(	integer, intent(in)	ilat,
		integer, intent(out)	ilon,
		real, intent(in)	ndvi,
		real, intent(in)	sa,
		real, intent(in)	ra
	)

Definition at line 6206 of file modis_surface_nc4.f95.

◆ latlon_to_index_ler()

integer function, public modis_surface::latlon_to_index_ler	(	real, intent(in)	lat,
		real, intent(in)	lon,
		integer, intent(inout)	ilat,
		integer, intent(inout)	ilon
	)

Definition at line 5957 of file modis_surface_nc4.f95.

◆ load_brdf()

integer function, public modis_surface::load_brdf ( character(len=255), intent(in) brdffile )

Definition at line 283 of file modis_surface_nc4.f95.

◆ load_hdfler()

integer function, public modis_surface::load_hdfler	(	character(len=255), intent(in)	lut_file,
		integer, intent(in)	season
	)

Definition at line 4890 of file modis_surface_nc4.f95.

◆ load_seasonal_desert()

integer function, public modis_surface::load_seasonal_desert ( character(len=255), intent(in) file )

Definition at line 213 of file modis_surface_nc4.f95.

◆ load_swir_coeffs()

integer function, public modis_surface::load_swir_coeffs	(	character(len=255), intent(in)	file,
		integer, intent(in)	season
	)

Definition at line 5094 of file modis_surface_nc4.f95.

◆ load_terrainflg_tables()

integer function, public modis_surface::load_terrainflg_tables	(	character(len=255), intent(in)	tflg_file,
		integer, intent(in)	season
	)

Definition at line 82 of file modis_surface_nc4.f95.

◆ readswir2()

integer function modis_surface::readswir2	(	integer, dimension(3), intent(in)	start,
		integer, dimension(3), intent(in)	edge,
		integer, dimension(3), intent(in)	stride,
		character(len=255)	sds_name,
		integer, intent(in)	grp_id,
		real, dimension(edge(1),edge(2)), intent(out)	outref
	)

Definition at line 5716 of file modis_surface_nc4.f95.

◆ readswir3()

integer function modis_surface::readswir3	(	integer, dimension(4), intent(in)	start3,
		integer, dimension(4), intent(in)	edges3,
		integer, dimension(4), intent(in)	stride3,
		character(len=255)	sds_name,
		integer, intent(in)	grp_id,
		real, dimension(:,:,:), intent(inout)	outref
	)

Definition at line 5805 of file modis_surface_nc4.f95.

◆ set_limits()

integer function, public modis_surface::set_limits	(	integer, dimension(2), intent(in)	locedge,
		real, dimension(locedge(1),locedge(2)), intent(in)	lat,
		real, dimension(locedge(1),locedge(2)), intent(in)	long
	)

Definition at line 4640 of file modis_surface_nc4.f95.

◆ set_limits6()

integer function, public modis_surface::set_limits6	(	integer, dimension(2), intent(in)	locedge,
		real, dimension(locedge(1),locedge(2)), intent(in)	lat,
		real, dimension(locedge(1),locedge(2)), intent(in)	long
	)

Definition at line 4803 of file modis_surface_nc4.f95.

◆ unload_brdf()

subroutine, public modis_surface::unload_brdf ( integer, intent(inout) status )

Definition at line 721 of file modis_surface_nc4.f95.

Variable Documentation

◆ sfc_elev_std

real, dimension(3600,1800), public sfc_elev_std

Definition at line 52 of file modis_surface_nc4.f95.

◆ terrain_flag

real, dimension(3600,1800), public terrain_flag