retrieval_prep_logic Module Reference

Functions/Subroutines
subroutine	init_retrieval (library_taus)
subroutine	cleanup_retrieval
subroutine	compute_water_path (tau, re, density, library_re, extinction_efficiency, water_path)
subroutine	vis_nonabsorbing_science (reflectance_nonabsorbing, nonabsorbing_index, nonabsorbing_albedo, library_taus, library_radii, sfr, fti1, fti0, rfi, theta, theta0, phi, cloudtop_pressure, process, optical_thickness_vector)
subroutine	vis_absorbing_science (optical_thickness_vector, reflectance_absorbing, absorbing_index, absorbing_albedo, library_taus, library_radii, sfr, fti1, fti0, rfi, residual, maxradii, debug)
subroutine	interpolate_refl_cot (reflectance, reflectance_vector, optical_thickness_vector, optical_thickness)
subroutine	rayleighcorrection (reflectance, cloudtoppressure, process, optical_thickness, nonabsorbing_galbedo, fti1, fti0, sfr, iw, ir, solarzenith, sensorzenith, azimuth, reflectance_corrected)
subroutine	interp_lib_reflflux_cloudalbedo (miu0, miu, optical_thickness, nonabsorbing_galbedo, sfr, fti1, fti0, iw, ir, fluxsolarzenithangles, fluxsensorzenithangles, fluxup_solar, fluxup_sensor, interp_fluxup_solar, interp_fluxup_sensor)
subroutine	nir_absorbing_science (platform_name, optical_thickness_vector, reflectance_absorbing, absorbing_index, absorbing_albedo, xpoint, ypoint, CTT, thermal_trans_1way, thermal_trans_2way, library_taus, library_radii, sfr, fti1, fti0, fri1, rfi, cl_emis, sf_emis, residual, maxradii, channel_number_37, emission_uncertainty_pw, emission_uncertainty_Tc, sigma_R37_PW, debug)
subroutine	toa_radiance37 (platform_name, taux, tc, sfr, rfi1, fti0, fti1, fri1, rfi, galbedo, B_Tg, B_Tc, rf1, rtherm37, channel_number_37, reflib, Es, Ec)
subroutine	toa_radiance37_cox_munk (platform_name, taux, tc, B_Tg, B_Tc, rfi, cl_emis, sf_emis, rf1, rtherm37, channel_number_37, Es, Ec)
subroutine	calculate_new_tc (platform_name, Tc, Tg, galbedo, wlen, tau, re, lib_taus, lib_res, sph_albedo, down_flux_sensor, up_flux_sensor, cloud_emiss, surface_emiss, newTc, PRN)

Variables
logical	go_print

Function/Subroutine Documentation

calculate_new_tc()

subroutine retrieval_prep_logic::calculate_new_tc	(	character(*), intent(in)	platform_name,
		real, intent(in)	Tc,
		real, intent(in)	Tg,
		real, intent(in)	galbedo,
		integer, intent(in)	wlen,
		real, intent(in)	tau,
		real, intent(in)	re,
		real, dimension(:), intent(in)	lib_taus,
		real, dimension(:), intent(in)	lib_res,
		real, dimension(:,:,:), intent(in)	sph_albedo,
		real, dimension(:,:,:), intent(in)	down_flux_sensor,
		real, dimension(:,:,:), intent(in)	up_flux_sensor,
		real, dimension(:,:,:), intent(in)	cloud_emiss,
		real, dimension(:,:,:), intent(in)	surface_emiss,
		real, intent(inout)	newTc,
		logical, intent(in)	PRN
	)

Definition at line 1321 of file retrieval_prep_logic.f90.

cleanup_retrieval()

subroutine retrieval_prep_logic::cleanup_retrieval

Definition at line 35 of file retrieval_prep_logic.f90.

compute_water_path()

subroutine retrieval_prep_logic::compute_water_path	(	real, intent(in)	tau,
		real, intent(in)	re,
		real, intent(in)	density,
		real, dimension(:), intent(in)	library_re,
		real, dimension(:), intent(in)	extinction_efficiency,
		real, intent(out)	water_path
	)

Definition at line 43 of file retrieval_prep_logic.f90.

init_retrieval()

subroutine retrieval_prep_logic::init_retrieval

(

real, dimension(:), intent(in)

library_taus

)

Definition at line 16 of file retrieval_prep_logic.f90.

interp_lib_reflflux_cloudalbedo()

subroutine retrieval_prep_logic::interp_lib_reflflux_cloudalbedo	(	real, intent(in)	miu0,
		real, intent(in)	miu,
		real, intent(in)	optical_thickness,
		real, intent(in)	nonabsorbing_galbedo,
		real, dimension(:), intent(in)	sfr,
		real, dimension(:), intent(in)	fti1,
		real, dimension(:), intent(in)	fti0,
		integer, intent(in)	iw,
		integer, intent(in)	ir,
		real, dimension(:), intent(in)	fluxsolarzenithangles,
		real, dimension(:), intent(in)	fluxsensorzenithangles,
		real, dimension(:,:,:,:), intent(in)	fluxup_solar,
		real, dimension(:,:,:,:), intent(in)	fluxup_sensor,
		real, intent(out)	interp_fluxup_solar,
		real, intent(out)	interp_fluxup_sensor
	)

Definition at line 634 of file retrieval_prep_logic.f90.

interpolate_refl_cot()

subroutine retrieval_prep_logic::interpolate_refl_cot	(	real, intent(in)	reflectance,
		real, dimension(:), intent(in)	reflectance_vector,
		real, dimension(:), intent(in)	optical_thickness_vector,
		real, intent(out)	optical_thickness
	)

Definition at line 446 of file retrieval_prep_logic.f90.

nir_absorbing_science()

subroutine retrieval_prep_logic::nir_absorbing_science	(	character*(*), intent(in)	platform_name,
		real, dimension(:), intent(in)	optical_thickness_vector,
		real, intent(in)	reflectance_absorbing,
		integer, intent(in)	absorbing_index,
		real, intent(in)	absorbing_albedo,
		integer, intent(in)	xpoint,
		integer, intent(in)	ypoint,
		real, intent(in)	CTT,
		real, intent(in)	thermal_trans_1way,
		real, intent(in)	thermal_trans_2way,
		real(single), dimension(:), intent(in)	library_taus,
		real(single), dimension(:), intent(in)	library_radii,
		real(single), dimension(:,:,:), intent(in)	sfr,
		real(single), dimension(:,:,:), intent(in)	fti1,
		real(single), dimension(:,:,:), intent(in)	fti0,
		real(single), dimension(:,:,:), intent(in)	fri1,
		real(single), dimension(:,:,:), intent(in)	rfi,
		real(single), dimension(:,:,:), intent(in)	cl_emis,
		real(single), dimension(:,:,:), intent(in)	sf_emis,
		real, dimension(:), intent(out)	residual,
		integer, intent(out)	maxradii,
		integer, intent(in)	channel_number_37,
		real, dimension(:), intent(inout)	emission_uncertainty_pw,
		real, dimension(:), intent(inout)	emission_uncertainty_Tc,
		real, dimension(:), intent(inout)	sigma_R37_PW,
		logical, intent(in)	debug
	)

Definition at line 859 of file retrieval_prep_logic.f90.

rayleighcorrection()

subroutine retrieval_prep_logic::rayleighcorrection	(	real, intent(in)	reflectance,
		real, intent(in)	cloudtoppressure,
		type(cloudphase), intent(in)	process,
		real, intent(in)	optical_thickness,
		real, intent(in)	nonabsorbing_galbedo,
		real, dimension(:), intent(in)	fti1,
		real, dimension(:), intent(in)	fti0,
		real, dimension(:), intent(in)	sfr,
		integer, intent(in)	iw,
		integer, intent(in)	ir,
		real, intent(in)	solarzenith,
		real, intent(in)	sensorzenith,
		real, intent(in)	azimuth,
		real, intent(out)	reflectance_corrected
	)

Definition at line 514 of file retrieval_prep_logic.f90.

toa_radiance37()

subroutine retrieval_prep_logic::toa_radiance37	(	character*(*), intent(in)	platform_name,
		real, dimension(:), intent(in)	taux,
		real, intent(in)	tc,
		real(single), dimension(:), intent(in)	sfr,
		real, intent(in)	rfi1,
		real(single), dimension(:), intent(in)	fti0,
		real(single), dimension(:), intent(in)	fti1,
		real(single), dimension(:), intent(in)	fri1,
		real(single), dimension(:), intent(in)	rfi,
		real, intent(in)	galbedo,
		real, intent(in)	B_Tg,
		real, intent(in)	B_Tc,
		real, intent(out)	rf1,
		real, intent(out)	rtherm37,
		integer, intent(in)	channel_number_37,
		real, dimension(:), intent(inout)	reflib,
		real, intent(out)	Es,
		real, intent(out)	Ec
	)

Definition at line 1078 of file retrieval_prep_logic.f90.

toa_radiance37_cox_munk()

subroutine retrieval_prep_logic::toa_radiance37_cox_munk	(	character*(*), intent(in)	platform_name,
		real, dimension(:), intent(in)	taux,
		real, intent(in)	tc,
		real, intent(in)	B_Tg,
		real, intent(in)	B_Tc,
		real(single), dimension(:), intent(in)	rfi,
		real(single), dimension(:), intent(in)	cl_emis,
		real(single), dimension(:), intent(in)	sf_emis,
		real, intent(out)	rf1,
		real, intent(out)	rtherm37,
		integer, intent(in)	channel_number_37,
		real, intent(out)	Es,
		real, intent(out)	Ec
	)

Definition at line 1235 of file retrieval_prep_logic.f90.

vis_absorbing_science()

subroutine retrieval_prep_logic::vis_absorbing_science	(	real, dimension(:), intent(in)	optical_thickness_vector,
		real, intent(in)	reflectance_absorbing,
		integer, intent(in)	absorbing_index,
		real, intent(in)	absorbing_albedo,
		real(single), dimension(:), intent(in)	library_taus,
		real(single), dimension(:), intent(in)	library_radii,
		real(single), dimension(:,:,:), intent(in)	sfr,
		real(single), dimension(:,:,:), intent(in)	fti1,
		real(single), dimension(:,:,:), intent(in)	fti0,
		real(single), dimension(:,:,:), intent(in)	rfi,
		real, dimension(:), intent(out)	residual,
		integer, intent(out)	maxradii,
		logical, intent(in)	debug
	)

Definition at line 267 of file retrieval_prep_logic.f90.

vis_nonabsorbing_science()

subroutine retrieval_prep_logic::vis_nonabsorbing_science	(	real, intent(in)	reflectance_nonabsorbing,
		integer, intent(in)	nonabsorbing_index,
		real, intent(in)	nonabsorbing_albedo,
		real(single), dimension (:), intent(in)	library_taus,
		real(single), dimension (:), intent(in)	library_radii,
		real(single), dimension (:,:,:), intent(in)	sfr,
		real(single), dimension (:,:,:), intent(in)	fti1,
		real(single), dimension (:,:,:), intent(in)	fti0,
		real(single), dimension (:,:,:), intent(in)	rfi,
		real, intent(in)	theta,
		real, intent(in)	theta0,
		real, intent(in)	phi,
		real, intent(in)	cloudtop_pressure,
		type(cloudphase), intent(in)	process,
		real, dimension(:), intent(out)	optical_thickness_vector
	)

Definition at line 76 of file retrieval_prep_logic.f90.

Variable Documentation

go_print

logical go_print

Definition at line 11 of file retrieval_prep_logic.f90.