mod_thermal_emission Module Reference

Data Types
interface	get_subr1
type	te_fluid

Functions/Subroutines
subroutine	get_line_info (wl, ion, mass, logTe, line_center, spatial_px, spectral_px, sigma_PSF, width_slit)
subroutine	get_euv (wl, ixIL, ixOL, w, x, fl, flux)
subroutine	get_sxr (ixIL, ixOL, w, x, fl, flux, El, Eu)
subroutine	get_goes_sxr_flux (xboxL, fl, eflux)
subroutine	get_goes_flux_grid (ixIL, ixOL, w, x, dV, xboxL, xbL, fl, eflux_grid)
subroutine	get_euv_spectrum (qunit, fl)
subroutine	get_spectrum_datresol (qunit, datatype, fl)
subroutine	integrate_spectra_datresol (igrid, wL, dwL, spectra, numWL, numXS, dir_loc, fl)
subroutine	get_spectrum (qunit, datatype, fl)
subroutine	integrate_spectra_cartesian (igrid, wL, dwLg, xS, dxSg, spectra, numWL, numXS, fl)
subroutine	get_euv_image (qunit, fl)
subroutine	get_sxr_image (qunit, fl)
subroutine	get_whitelight_image (qunit, fl)
subroutine	get_image_datresol (qunit, datatype, fl)
subroutine	integrate_sxr_datresol (igrid, nXIF1, nXIF2, xIF1, xIF2, dxIF1, dxIF2, fl, SXR)
subroutine	integrate_euv_datresol (igrid, nXIF1, nXIF2, xIF1, xIF2, dxIF1, dxIF2, fl, EUV, Dpl)
subroutine	get_image (qunit, datatype, fl)
subroutine	integrate_emission_cartesian (igrid, numXI1, numXI2, xI1, xI2, dxI, fl, datatype, EM)
subroutine	integrate_emission_spherical (igrid, numXI1, numXI2, xI1, xI2, dxI, fl, datatype, EM)
subroutine	integrate_whitelight_spherical (igrid, numXI1, numXI2, numWI, xI1, xI2, dxI, fl, datatype, WLB)
subroutine	get_thomson_parameters (Rl, A, B, C, D)
subroutine	get_whitelight_thomson (Rl, Rin, Ne, A, B, C, D, fluxTB, fluxPB)
subroutine	get_unit_vector_spherical (x_sph, unitv_r, unitv_theta, unitv_phi)
subroutine	output_data (qunit, xO1, xO2, dxO1, dxO2, wO, nXO1, nXO2, nWO, datatype)
subroutine	write_image_vticc (qunit, xO1, xO2, dxO1, dxO2, wO, nXO1, nXO2, nWO, nC1, nC2)
subroutine	write_image_vtucc (qunit, xC, wC, dxC, nPiece, nC1, nC2, nWC, datatype)
subroutine	dot_product_loc (vec1, vec2, res)
subroutine	cross_product_loc (vec_in1, vec_in2, vec_out)
subroutine	init_vectors_spherical ()
subroutine	spherical_to_cartesian (vec_sph, vec_car)
subroutine	cartesian_to_spherical (vec_car, vec_sph)
subroutine	init_vectors_cartesian ()
subroutine	get_cor_image_spherical (x_3D_sph, x_image)
subroutine	get_cor_image (x_3D, x_image)

Variables
integer	n_aia
double precision, dimension(1:101)	t_aia
double precision, dimension(1:101)	f_94
double precision, dimension(1:101)	f_131
double precision, dimension(1:101)	f_171
double precision, dimension(1:101)	f_193
double precision, dimension(1:101)	f_211
double precision, dimension(1:101)	f_304
double precision, dimension(1:101)	f_335
integer	n_iris
double precision, dimension(1:41)	t_iris
double precision, dimension(1:41)	f_1354
integer	n_eis
double precision, dimension(1:60)	t_eis1
double precision, dimension(1:60)	t_eis2
double precision, dimension(1:60)	f_263
double precision, dimension(1:60)	f_264
double precision, dimension(1:60)	f_192
double precision, dimension(1:60)	f_255
double precision, dimension(1:3)	vec_xi1
double precision, dimension(1:3)	vec_xi2
double precision, dimension(1:3)	vec_los

Function/Subroutine Documentation

cartesian_to_spherical()

subroutine mod_thermal_emission::cartesian_to_spherical	(	double precision, dimension(1:3), intent(in)	vec_car,
		double precision, dimension(1:3), intent(inout)	vec_sph
	)

Definition at line 3458 of file mod_thermal_emission.t.

cross_product_loc()

subroutine mod_thermal_emission::cross_product_loc	(	double precision, dimension(1:3), intent(in)	vec_in1,
		double precision, dimension(1:3), intent(in)	vec_in2,
		double precision, dimension(1:3), intent(out)	vec_out
	)

Definition at line 3378 of file mod_thermal_emission.t.

dot_product_loc()

subroutine mod_thermal_emission::dot_product_loc	(	double precision, dimension(1:3), intent(in)	vec1,
		double precision, dimension(1:3), intent(in)	vec2,
		double precision, intent(out)	res
	)

Definition at line 3370 of file mod_thermal_emission.t.

get_cor_image()

subroutine mod_thermal_emission::get_cor_image	(	double precision, dimension(1:3), intent(in)	x_3D,
		double precision, dimension(1:2), intent(inout)	x_image
	)

Definition at line 3522 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_cor_image_spherical()

subroutine mod_thermal_emission::get_cor_image_spherical	(	double precision, dimension(1:3), intent(in)	x_3D_sph,
		double precision, dimension(1:2), intent(inout)	x_image
	)

Definition at line 3508 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_euv()

subroutine mod_thermal_emission::get_euv	(	integer, intent(in)	wl,
		integer, intent(in)	ixI,
		integer, intent(in)	L,
		integer, intent(in)	ixO,
			L,
		double precision, dimension(ixi^s,1:nw), intent(in)	w,
		double precision, dimension(ixi^s,1:ndim), intent(in)	x,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(ixi^s), intent(out)	flux
	)

Definition at line 526 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_euv_image()

subroutine mod_thermal_emission::get_euv_image	(	integer, intent(in)	qunit,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1495 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_euv_spectrum()

subroutine mod_thermal_emission::get_euv_spectrum	(	integer, intent(in)	qunit,
		type(te_fluid), intent(in)	fl
	)

Definition at line 838 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_goes_flux_grid()

subroutine mod_thermal_emission::get_goes_flux_grid	(	integer, intent(in)	ixI,
		integer, intent(in)	L,
		integer, intent(in)	ixO,
			L,
		double precision, dimension(ixi^s,nw), intent(in)	w,
		double precision, dimension(ixi^s,1:ndim), intent(in)	x,
		double precision, dimension(ixi^s), intent(in)	dV,
		double precision, intent(in)	xbox,
			L,
		double precision, intent(in)	xb,
			L,
		type(te_fluid), intent(in)	fl,
		double precision, intent(out)	eflux_grid
	)

Definition at line 767 of file mod_thermal_emission.t.

get_goes_sxr_flux()

subroutine mod_thermal_emission::get_goes_sxr_flux	(	double precision, intent(in)	xbox,
		integer, intent(in)	L,
		type(te_fluid), intent(in)	fl,
		double precision, intent(out)	eflux
	)

Definition at line 739 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_image()

subroutine mod_thermal_emission::get_image	(	integer, intent(in)	qunit,
		character(20), intent(in)	datatype,
		type(te_fluid), intent(in)	fl
	)

Definition at line 2300 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_image_datresol()

subroutine mod_thermal_emission::get_image_datresol	(	integer, intent(in)	qunit,
		character(20), intent(in)	datatype,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1695 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_line_info()

subroutine mod_thermal_emission::get_line_info	(	integer, intent(in)	wl,
		character(len=30), intent(out)	ion,
		integer, intent(out)	mass,
		double precision, intent(out)	logTe,
		double precision, intent(out)	line_center,
		double precision, intent(out)	spatial_px,
		double precision, intent(out)	spectral_px,
		double precision, intent(out)	sigma_PSF,
		double precision, intent(out)	width_slit
	)

Definition at line 392 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_spectrum()

subroutine mod_thermal_emission::get_spectrum	(	integer, intent(in)	qunit,
		character(20), intent(in)	datatype,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1219 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_spectrum_datresol()

subroutine mod_thermal_emission::get_spectrum_datresol	(	integer, intent(in)	qunit,
		character(20), intent(in)	datatype,
		type(te_fluid), intent(in)	fl
	)

Definition at line 913 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_sxr()

subroutine mod_thermal_emission::get_sxr	(	integer, intent(in)	ixI,
		integer, intent(in)	L,
		integer, intent(in)	ixO,
			L,
		double precision, dimension(ixi^s,nw), intent(in)	w,
		double precision, dimension(ixi^s,1:ndim), intent(in)	x,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(ixi^s), intent(out)	flux,
		integer, intent(in)	El,
		integer, intent(in)	Eu
	)

Definition at line 684 of file mod_thermal_emission.t.

get_sxr_image()

subroutine mod_thermal_emission::get_sxr_image	(	integer, intent(in)	qunit,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1570 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_thomson_parameters()

subroutine mod_thermal_emission::get_thomson_parameters	(	double precision, intent(in)	Rl,
		double precision, intent(inout)	A,
		double precision, intent(inout)	B,
		double precision, intent(inout)	C,
		double precision, intent(inout)	D
	)

Definition at line 2888 of file mod_thermal_emission.t.

get_unit_vector_spherical()

subroutine mod_thermal_emission::get_unit_vector_spherical	(	double precision, dimension(1:3), intent(in)	x_sph,
		double precision, dimension(1:3), intent(inout)	unitv_r,
		double precision, dimension(1:3), intent(inout)	unitv_theta,
		double precision, dimension(1:3), intent(inout)	unitv_phi
	)

Definition at line 2927 of file mod_thermal_emission.t.

get_whitelight_image()

subroutine mod_thermal_emission::get_whitelight_image	(	integer, intent(in)	qunit,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1643 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_whitelight_thomson()

subroutine mod_thermal_emission::get_whitelight_thomson	(	double precision, intent(in)	Rl,
		double precision, intent(in)	Rin,
		double precision, intent(in)	Ne,
		double precision, intent(in)	A,
		double precision, intent(in)	B,
		double precision, intent(in)	C,
		double precision, intent(in)	D,
		double precision, intent(inout)	fluxTB,
		double precision, intent(inout)	fluxPB
	)

Definition at line 2908 of file mod_thermal_emission.t.

init_vectors_cartesian()

subroutine mod_thermal_emission::init_vectors_cartesian

Definition at line 3469 of file mod_thermal_emission.t.

Here is the call graph for this function:

init_vectors_spherical()

subroutine mod_thermal_emission::init_vectors_spherical

Definition at line 3388 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_emission_cartesian()

subroutine mod_thermal_emission::integrate_emission_cartesian	(	integer, intent(in)	igrid,
		integer, intent(in)	numXI1,
		integer, intent(in)	numXI2,
		double precision, dimension(numxi1), intent(in)	xI1,
		double precision, dimension(numxi2), intent(in)	xI2,
		double precision, intent(in)	dxI,
		type(te_fluid), intent(in)	fl,
		character(20), intent(in)	datatype,
		double precision, dimension(numxi1,numxi2), intent(inout)	EM
	)

Definition at line 2502 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_emission_spherical()

subroutine mod_thermal_emission::integrate_emission_spherical	(	integer, intent(in)	igrid,
		integer, intent(in)	numXI1,
		integer, intent(in)	numXI2,
		double precision, dimension(numxi1), intent(in)	xI1,
		double precision, dimension(numxi2), intent(in)	xI2,
		double precision, intent(in)	dxI,
		type(te_fluid), intent(in)	fl,
		character(20), intent(in)	datatype,
		double precision, dimension(numxi1,numxi2), intent(inout)	EM
	)

Definition at line 2603 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_datresol()

subroutine mod_thermal_emission::integrate_euv_datresol	(	integer, intent(in)	igrid,
		integer, intent(in)	nXIF1,
		integer, intent(in)	nXIF2,
		double precision, dimension(nxif1), intent(in)	xIF1,
		double precision, dimension(nxif2), intent(in)	xIF2,
		double precision, dimension(nxif1), intent(in)	dxIF1,
		double precision, dimension(nxif2), intent(in)	dxIF2,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(nxif1,nxif2), intent(out)	EUV,
		double precision, dimension(nxif1,nxif2), intent(out)	Dpl
	)

Definition at line 2123 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_spectra_cartesian()

subroutine mod_thermal_emission::integrate_spectra_cartesian	(	integer, intent(in)	igrid,
		double precision, dimension(numwl), intent(in)	wL,
		double precision, intent(in)	dwLg,
		double precision, dimension(numxs), intent(in)	xS,
		double precision, intent(in)	dxSg,
		double precision, dimension(numwl,numxs), intent(inout)	spectra,
		integer, intent(in)	numWL,
		integer, intent(in)	numXS,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1376 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_spectra_datresol()

subroutine mod_thermal_emission::integrate_spectra_datresol	(	integer, intent(in)	igrid,
		double precision, dimension(numwl), intent(in)	wL,
		double precision, dimension(numwl), intent(in)	dwL,
		double precision, dimension(numwl,numxs), intent(inout)	spectra,
		integer, intent(in)	numWL,
		integer, intent(in)	numXS,
		integer, intent(in)	dir_loc,
		type(te_fluid), intent(in)	fl
	)

Definition at line 1094 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_sxr_datresol()

subroutine mod_thermal_emission::integrate_sxr_datresol	(	integer, intent(in)	igrid,
		integer, intent(in)	nXIF1,
		integer, intent(in)	nXIF2,
		double precision, dimension(nxif1), intent(in)	xIF1,
		double precision, dimension(nxif2), intent(in)	xIF2,
		double precision, dimension(nxif1), intent(in)	dxIF1,
		double precision, dimension(nxif2), intent(in)	dxIF2,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(nxif1,nxif2), intent(out)	SXR
	)

Definition at line 1963 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_whitelight_spherical()

subroutine mod_thermal_emission::integrate_whitelight_spherical	(	integer, intent(in)	igrid,
		integer, intent(in)	numXI1,
		integer, intent(in)	numXI2,
		integer, intent(in)	numWI,
		double precision, dimension(numxi1), intent(in)	xI1,
		double precision, dimension(numxi2), intent(in)	xI2,
		double precision, intent(in)	dxI,
		type(te_fluid), intent(in)	fl,
		character(20), intent(in)	datatype,
		double precision, dimension(numxi1,numxi2,numwi), intent(inout)	WLB
	)

Definition at line 2756 of file mod_thermal_emission.t.

Here is the call graph for this function:

output_data()

subroutine mod_thermal_emission::output_data	(	integer, intent(in)	qunit,
		double precision, dimension(nxo1), intent(in)	xO1,
		double precision, dimension(nxo2), intent(in)	xO2,
		double precision, dimension(nxo1), intent(in)	dxO1,
		double precision, dimension(nxo2), intent(in)	dxO2,
		double precision, dimension(nxo1,nxo2,nwo), intent(inout)	wO,
		integer, intent(in)	nXO1,
		integer, intent(in)	nXO2,
		integer, intent(in)	nWO,
		character(20), intent(in)	datatype
	)

Definition at line 2943 of file mod_thermal_emission.t.

Here is the call graph for this function:

spherical_to_cartesian()

subroutine mod_thermal_emission::spherical_to_cartesian	(	double precision, dimension(1:3), intent(in)	vec_sph,
		double precision, dimension(1:3), intent(inout)	vec_car
	)

Definition at line 3447 of file mod_thermal_emission.t.

write_image_vticc()

subroutine mod_thermal_emission::write_image_vticc	(	integer, intent(in)	qunit,
		double precision, dimension(nxo1), intent(in)	xO1,
		double precision, dimension(nxo2), intent(in)	xO2,
		double precision, dimension(nxo1), intent(in)	dxO1,
		double precision, dimension(nxo2), intent(in)	dxO2,
		double precision, dimension(nxo1,nxo2,nwo), intent(in)	wO,
		integer, intent(in)	nXO1,
		integer, intent(in)	nXO2,
		integer, intent(in)	nWO,
		integer, intent(in)	nC1,
		integer, intent(in)	nC2
	)

Definition at line 3049 of file mod_thermal_emission.t.

Here is the call graph for this function:

write_image_vtucc()

subroutine mod_thermal_emission::write_image_vtucc	(	integer, intent(in)	qunit,
		double precision, dimension(npiece,nc1,nc2,2), intent(in)	xC,
		double precision, dimension(npiece,nc1,nc2,nwc), intent(in)	wC,
		double precision, dimension(npiece,nc1,nc2,2), intent(in)	dxC,
		integer, intent(in)	nPiece,
		integer, intent(in)	nC1,
		integer, intent(in)	nC2,
		integer, intent(in)	nWC,
		character(20), intent(in)	datatype
	)

Definition at line 3191 of file mod_thermal_emission.t.

Here is the call graph for this function:

Variable Documentation

f_131

double precision, dimension(1:101) mod_thermal_emission::f_131

Definition at line 20 of file mod_thermal_emission.t.

f_1354

double precision, dimension(1:41) mod_thermal_emission::f_1354

Definition at line 25 of file mod_thermal_emission.t.

f_171

double precision, dimension(1:101) mod_thermal_emission::f_171

Definition at line 20 of file mod_thermal_emission.t.

f_192

double precision, dimension(1:60) mod_thermal_emission::f_192

Definition at line 28 of file mod_thermal_emission.t.

f_193

double precision, dimension(1:101) mod_thermal_emission::f_193

Definition at line 21 of file mod_thermal_emission.t.

f_211

double precision, dimension(1:101) mod_thermal_emission::f_211

Definition at line 21 of file mod_thermal_emission.t.

f_255

double precision, dimension(1:60) mod_thermal_emission::f_255

Definition at line 28 of file mod_thermal_emission.t.

f_263

double precision, dimension(1:60) mod_thermal_emission::f_263

Definition at line 28 of file mod_thermal_emission.t.

f_264

double precision, dimension(1:60) mod_thermal_emission::f_264

Definition at line 28 of file mod_thermal_emission.t.

f_304

double precision, dimension(1:101) mod_thermal_emission::f_304

Definition at line 21 of file mod_thermal_emission.t.

f_335

double precision, dimension(1:101) mod_thermal_emission::f_335

Definition at line 22 of file mod_thermal_emission.t.

f_94

double precision, dimension(1:101) mod_thermal_emission::f_94

Definition at line 20 of file mod_thermal_emission.t.

n_aia

integer mod_thermal_emission::n_aia

Definition at line 18 of file mod_thermal_emission.t.

n_eis

integer mod_thermal_emission::n_eis

Definition at line 26 of file mod_thermal_emission.t.

n_iris

integer mod_thermal_emission::n_iris

Definition at line 23 of file mod_thermal_emission.t.

t_aia

double precision, dimension(1:101) mod_thermal_emission::t_aia

Definition at line 19 of file mod_thermal_emission.t.

t_eis1

double precision, dimension(1:60) mod_thermal_emission::t_eis1

Definition at line 27 of file mod_thermal_emission.t.

t_eis2

double precision, dimension(1:60) mod_thermal_emission::t_eis2

Definition at line 27 of file mod_thermal_emission.t.

t_iris

double precision, dimension(1:41) mod_thermal_emission::t_iris

Definition at line 24 of file mod_thermal_emission.t.

vec_los

double precision, dimension(1:3) mod_thermal_emission::vec_los

Definition at line 31 of file mod_thermal_emission.t.

vec_xi1

double precision, dimension(1:3) mod_thermal_emission::vec_xi1

Definition at line 31 of file mod_thermal_emission.t.

vec_xi2

double precision, dimension(1:3) mod_thermal_emission::vec_xi2

Definition at line 31 of file mod_thermal_emission.t.