mod_thermal_emission Module Reference

Data Types
interface	get_2var_subr_te
interface	get_subr1
type	radsyn_euv_cache
type	te_fluid

Functions/Subroutines
subroutine	check_synthetic_emission_options (datatype)
subroutine	integrate_transfer_step_first_order (emissivity, opacity, path_length, intensity, tau)
logical function	radsyn_euv_has_doppler_output ()
integer function	radsyn_euv_num_outputs (has_doppler, has_thick)
subroutine	normalize_euv_doppler (ni1, ni2, euv, dpl, unitv)
subroutine	fill_euv_absorption_fraction (ni1, ni2, euv, euvthin, smallflux, absorption, cap_to_one)
subroutine	pack_euv_image_outputs (ni1, ni2, euv, wi, smallflux, has_doppler, has_thick, dpl, tau, euvthin, cap_absorption)
subroutine	radsyn_get_segment_batch_limits (pixel_batch_target, segment_batch_target, segment_comm_target)
double precision function	transfer_attenuation (tau)
double precision function	exp_clamped (argument)
double precision function	pow10_clamped (exponent)
double precision function	interpolate_response_value (temperature, t_table, f_table, n_table, log_temperature, log_response)
subroutine	apply_temperature_response (ixil, ixol, te, flux, t_table, f_table, n_table, log_temperature, log_response)
subroutine	get_euv_saha_fractions (te, ne, x_hii, x_heii, x_heiii)
subroutine	solve_euv_saha_charge_state (nh, te, rhe, ne_guess, x_hii, x_heii, x_heiii)
subroutine	get_euv_hhe_opacity (wl, ixil, ixol, w, x, fl, kappa)
subroutine	get_pseudo_current (igrid, ixil, ixol, w, source)
subroutine	get_radio_ff_source_opacity (ixil, ixol, w, x, fl, source, kappa)
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	postprocess_euv_instrument_image (nsrc1, nsrc2, xsrc1, xsrc2, dxsrc1, dxsrc2, euv, dpl, nout1, nout2, xout1, xout2, dxout1, dxout2, wout, numwout, tau, euvthin)
subroutine	postprocess_radio_beam_image (nsrc1, nsrc2, xsrc1, xsrc2, dxsrc1, dxsrc2, bright, nout1, nout2, xout1, xout2, dxout1, dxout2, wout, numwout, tau, brightthin)
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	ray_box_intersection_cart (ray_origin, ray_dir, box_min, box_max, hit, t_enter, t_exit)
subroutine	build_cart_dda_faces (ixil, ixol, x, dx, xface1, xface2, xface3)
integer function	cart_dda_locate_index (pos, faces, imin, imax)
subroutine	cart_dda_init_axis (ray_origin_axis, ray_dir_axis, faces, imin, imax, idx, step, tmax)
subroutine	cart_dda_advance_axis (ray_origin_axis, ray_dir_axis, faces, imin, imax, idx, step, tmax, done)
subroutine	acc_euv_cart_dda (ixil, ixol, source, sourcev, ray_origin, xface1, xface2, xface3, t_enter, t_exit, euvp, dplp)
subroutine	append_cart_dda_segment (segments, nseg, capacity, pixel_id, tseg, jds, kds, jvds)
subroutine	collect_euv_cart_dda_segments (ixil, ixol, source, opacity, sourcev, pixel_id, ray_origin, xface1, xface2, xface3, t_enter, t_exit, segments, nseg, capacity)
subroutine	sort_segment_indices_near_to_far (segments, idx, nidx)
subroutine	insertion_sort_segment_indices (segments, idx, ilo, ihi)
recursive subroutine	quicksort_segment_indices (segments, idx, ilo, ihi)
integer function	segment_pixel_owner (pixel_id)
logical function	segment_is_valid (segments, is, nvars)
subroutine	cart_dda_block_pixel_range (box_min, box_max, nxif1, nxif2, xif1, xif2, ixpmin1, ixpmax1, ixpmin2, ixpmax2, has_pixels)
subroutine	integrate_euv_cart_dda_datresol (nxif1, nxif2, xif1, xif2, fl, euv, dpl)
subroutine	integrate_euv_cart_dda_thick_datresol (nxif1, nxif2, xif1, xif2, fl, euv, dpl, tau, euvthin)
subroutine	integrate_euv_thick_datresol (nxif1, nxif2, fl, euv, dpl, tau, euvthin)
subroutine	build_sph_intersection_faces (ixil, ixol, x, dx, rface, thetaface, phiface)
subroutine	sph_add_t (tvals, nt, capacity, t)
subroutine	sph_add_t_fixed (tvals, nt, t)
subroutine	sph_sort_unique_t (tvals, nt)
subroutine	sph_add_sphere_intersections (ray_origin, ray_dir, rface, tvals, nt, capacity)
subroutine	sph_add_theta_intersections (ray_origin, ray_dir, thetaface, tvals, nt, capacity)
subroutine	sph_add_phi_intersection (ray_origin, ray_dir, phiface, tvals, nt, capacity)
subroutine	sph_cart_to_coord (pos, sph)
integer function	sph_locate_index (value, faces, imin, imax)
integer function	sph_locate_index_desc (value, faces, imin, imax)
subroutine	sph_locate_cell (pos, rface, thetaface, phiface, ixol, ix1, ix2, ix3, inside)
logical function	sph_segment_visible (pos, ximg1, ximg2)
subroutine	sph_block_pixel_range (rface, thetaface, phiface, ixol, nxi1, nxi2, xi1, xi2, dxi, ixpmin1, ixpmax1, ixpmin2, ixpmax2, has_pixels)
subroutine	acc_euv_sph_intersection (ixil, ixol, source, ray_origin, ximg1, ximg2, rface, thetaface, phiface, euvp)
subroutine	collect_euv_sph_intersection_segments (ixil, ixol, source, opacity, pixel_id, ray_origin, ximg1, ximg2, rface, thetaface, phiface, rface2, theta_cos, phi_sin, phi_cos, segments, nseg, capacity)
subroutine	sph_locate_cell_fast (pos, rface2, theta_cos, phiface, ixol, ix1, ix2, ix3, inside)
subroutine	sph_try_exit_candidate (t, tnow, texit, epsray, tnext, found)
subroutine	sph_try_theta_exit_candidate (t, theta_face_cos, ray_origin, tnow, texit, epsray, tnext, found)
subroutine	sph_try_phi_exit_candidate (t, phi_face_sin, phi_face_cos, ray_origin, tnow, texit, epsray, tnext, found)
subroutine	sph_next_cell_exit (ray_origin, rface2, theta_cos, phiface, phi_sin, phi_cos, ixol, ix1, ix2, ix3, tnow, texit, epsray, tnext, found)
subroutine	collect_euv_sph_dda_interval (ixil, ixol, source, opacity, pixel_id, ray_origin, ximg1, ximg2, rface2, theta_cos, phiface, phi_sin, phi_cos, t_enter, t_exit, segments, nseg, capacity, ok)
subroutine	collect_euv_sph_dda_segments (ixil, ixol, source, opacity, pixel_id, ray_origin, ximg1, ximg2, rface, thetaface, phiface, rface2, theta_cos, phi_sin, phi_cos, segments, nseg, capacity, fallback)
subroutine	integrate_euv_sph_intersection_thin (numxi1, numxi2, xi1, xi2, dxi, fl, em)
subroutine	integrate_euv_sph_intersection_thick (numxi1, numxi2, xi1, xi2, dxi, fl, euv, tau, euvthin)
subroutine	get_sph_intersection_image_bounds (ximin1, ximax1, ximin2, ximax2)
subroutine	get_native_datresol_spacing (dxi)
subroutine	get_nominal_datresol_spacing (dxi)
subroutine	get_minimum_datresol_spacing (dxi)
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
character(len=std_len)	ray_method_active ='legacy'
logical	sph_use_dda =.false.

Function/Subroutine Documentation

acc_euv_cart_dda()

subroutine mod_thermal_emission::acc_euv_cart_dda	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(ixi^s), intent(in)	sourcev,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	xface1,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	xface2,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	xface3,
		double precision, intent(in)	t_enter,
		double precision, intent(in)	t_exit,
		double precision, intent(inout)	euvp,
		double precision, intent(inout)	dplp
	)

Definition at line 3523 of file mod_thermal_emission.t.

Here is the call graph for this function:

acc_euv_sph_intersection()

subroutine mod_thermal_emission::acc_euv_sph_intersection	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	ximg1,
		double precision, intent(in)	ximg2,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	thetaface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		double precision, intent(inout)	euvp
	)

Definition at line 4741 of file mod_thermal_emission.t.

Here is the call graph for this function:

append_cart_dda_segment()

subroutine mod_thermal_emission::append_cart_dda_segment	(	double precision, dimension(:,:), intent(inout), allocatable	segments,
		integer, intent(inout)	nseg,
		integer, intent(inout)	capacity,
		integer, intent(in)	pixel_id,
		double precision, intent(in)	tseg,
		double precision, intent(in)	jds,
		double precision, intent(in)	kds,
		double precision, intent(in)	jvds
	)

Definition at line 3575 of file mod_thermal_emission.t.

apply_temperature_response()

subroutine mod_thermal_emission::apply_temperature_response	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	te,
		double precision, dimension(ixi^s), intent(inout)	flux,
		double precision, dimension(n_table), intent(in)	t_table,
		double precision, dimension(n_table), intent(in)	f_table,
		integer, intent(in)	n_table,
		logical, intent(in)	log_temperature,
		logical, intent(in)	log_response
	)

Definition at line 782 of file mod_thermal_emission.t.

Here is the call graph for this function:

build_cart_dda_faces()

subroutine mod_thermal_emission::build_cart_dda_faces	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s,1:ndim), intent(in)	x,
		double precision, dimension(ixi^s,1:ndim), intent(in)	dx,
		double precision, dimension(:), intent(out), allocatable	xface1,
		double precision, dimension(:), intent(out), allocatable	xface2,
		double precision, dimension(:), intent(out), allocatable	xface3
	)

Definition at line 3424 of file mod_thermal_emission.t.

build_sph_intersection_faces()

subroutine mod_thermal_emission::build_sph_intersection_faces	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s,1:ndim), intent(in)	x,
		double precision, dimension(ixi^s,1:ndim), intent(in)	dx,
		double precision, dimension(:), intent(out), allocatable	rface,
		double precision, dimension(:), intent(out), allocatable	thetaface,
		double precision, dimension(:), intent(out), allocatable	phiface
	)

Definition at line 4432 of file mod_thermal_emission.t.

cart_dda_advance_axis()

subroutine mod_thermal_emission::cart_dda_advance_axis	(	double precision, intent(in)	ray_origin_axis,
		double precision, intent(in)	ray_dir_axis,
		double precision, dimension(imin:imax+1), intent(in)	faces,
		integer, intent(in)	imin,
		integer, intent(in)	imax,
		integer, intent(inout)	idx,
		integer, intent(in)	step,
		double precision, intent(inout)	tmax,
		logical, intent(out)	done
	)

Definition at line 3501 of file mod_thermal_emission.t.

cart_dda_block_pixel_range()

subroutine mod_thermal_emission::cart_dda_block_pixel_range	(	double precision, dimension(1:3), intent(in)	box_min,
		double precision, dimension(1:3), intent(in)	box_max,
		integer, intent(in)	nxif1,
		integer, intent(in)	nxif2,
		double precision, dimension(nxif1), intent(in)	xif1,
		double precision, dimension(nxif2), intent(in)	xif2,
		integer, intent(out)	ixpmin1,
		integer, intent(out)	ixpmax1,
		integer, intent(out)	ixpmin2,
		integer, intent(out)	ixpmax2,
		logical, intent(out)	has_pixels
	)

Definition at line 3753 of file mod_thermal_emission.t.

Here is the call graph for this function:

cart_dda_init_axis()

subroutine mod_thermal_emission::cart_dda_init_axis	(	double precision, intent(in)	ray_origin_axis,
		double precision, intent(in)	ray_dir_axis,
		double precision, dimension(imin:imax+1), intent(in)	faces,
		integer, intent(in)	imin,
		integer, intent(in)	imax,
		integer, intent(in)	idx,
		integer, intent(out)	step,
		double precision, intent(out)	tmax
	)

Definition at line 3483 of file mod_thermal_emission.t.

cart_dda_locate_index()

integer function mod_thermal_emission::cart_dda_locate_index	(	double precision, intent(in)	pos,
		double precision, dimension(imin:imax+1), intent(in)	faces,
		integer, intent(in)	imin,
		integer, intent(in)	imax
	)

Definition at line 3455 of file mod_thermal_emission.t.

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 6992 of file mod_thermal_emission.t.

check_synthetic_emission_options()

subroutine mod_thermal_emission::check_synthetic_emission_options

(

character(len=*), intent(in)

datatype

)

Definition at line 427 of file mod_thermal_emission.t.

Here is the call graph for this function:

collect_euv_cart_dda_segments()

subroutine mod_thermal_emission::collect_euv_cart_dda_segments	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(ixi^s), intent(in)	opacity,
		double precision, dimension(ixi^s), intent(in)	sourcev,
		integer, intent(in)	pixel_id,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	xface1,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	xface2,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	xface3,
		double precision, intent(in)	t_enter,
		double precision, intent(in)	t_exit,
		double precision, dimension(:,:), intent(inout), allocatable	segments,
		integer, intent(inout)	nseg,
		integer, intent(inout)	capacity
	)

Definition at line 3603 of file mod_thermal_emission.t.

Here is the call graph for this function:

collect_euv_sph_dda_interval()

subroutine mod_thermal_emission::collect_euv_sph_dda_interval	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(ixi^s), intent(in)	opacity,
		integer, intent(in)	pixel_id,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	ximg1,
		double precision, intent(in)	ximg2,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface2,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	theta_cos,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_sin,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_cos,
		double precision, intent(in)	t_enter,
		double precision, intent(in)	t_exit,
		double precision, dimension(:,:), intent(inout), allocatable	segments,
		integer, intent(inout)	nseg,
		integer, intent(inout)	capacity,
		logical, intent(out)	ok
	)

Definition at line 5033 of file mod_thermal_emission.t.

Here is the call graph for this function:

collect_euv_sph_dda_segments()

subroutine mod_thermal_emission::collect_euv_sph_dda_segments	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(ixi^s), intent(in)	opacity,
		integer, intent(in)	pixel_id,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	ximg1,
		double precision, intent(in)	ximg2,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	thetaface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface2,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	theta_cos,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_sin,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_cos,
		double precision, dimension(:,:), intent(inout), allocatable	segments,
		integer, intent(inout)	nseg,
		integer, intent(inout)	capacity,
		logical, intent(out)	fallback
	)

Definition at line 5109 of file mod_thermal_emission.t.

Here is the call graph for this function:

collect_euv_sph_intersection_segments()

subroutine mod_thermal_emission::collect_euv_sph_intersection_segments	(	integer, intent(in)	ixi,
		integer, intent(in)	l,
		integer, intent(in)	ixo,
			l,
		double precision, dimension(ixi^s), intent(in)	source,
		double precision, dimension(ixi^s), intent(in)	opacity,
		integer, intent(in)	pixel_id,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	ximg1,
		double precision, intent(in)	ximg2,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	thetaface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface2,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	theta_cos,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_sin,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_cos,
		double precision, dimension(:,:), intent(inout), allocatable	segments,
		integer, intent(inout)	nseg,
		integer, intent(inout)	capacity
	)

Definition at line 4787 of file mod_thermal_emission.t.

Here is the call graph for this function:

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 6912 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 6904 of file mod_thermal_emission.t.

exp_clamped()

double precision function mod_thermal_emission::exp_clamped

(

double precision, intent(in)

argument

)

Definition at line 705 of file mod_thermal_emission.t.

Here is the call graph for this function:

fill_euv_absorption_fraction()

subroutine mod_thermal_emission::fill_euv_absorption_fraction	(	integer, intent(in)	ni1,
		integer, intent(in)	ni2,
		double precision, dimension(ni1,ni2), intent(in)	euv,
		double precision, dimension(ni1,ni2), intent(in)	euvthin,
		double precision, intent(in)	smallflux,
		double precision, dimension(ni1,ni2), intent(out)	absorption,
		logical, intent(in), optional	cap_to_one
	)

Definition at line 625 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 7056 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 7042 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 1196 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_euv_hhe_opacity()

subroutine mod_thermal_emission::get_euv_hhe_opacity	(	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)	kappa
	)

Definition at line 894 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 2083 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_euv_saha_fractions()

subroutine mod_thermal_emission::get_euv_saha_fractions	(	double precision, intent(in)	te,
		double precision, intent(in)	ne,
		double precision, intent(out)	x_hii,
		double precision, intent(out)	x_heii,
		double precision, intent(out)	x_heiii
	)

Definition at line 798 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 1425 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 1350 of file mod_thermal_emission.t.

Here is the call graph for this function:

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 1322 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 5761 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 2611 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 1062 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_minimum_datresol_spacing()

subroutine mod_thermal_emission::get_minimum_datresol_spacing

(

double precision, intent(out)

dxi

)

Definition at line 5718 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_native_datresol_spacing()

subroutine mod_thermal_emission::get_native_datresol_spacing

(

double precision, intent(out)

dxi

)

Definition at line 5678 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_nominal_datresol_spacing()

subroutine mod_thermal_emission::get_nominal_datresol_spacing

(

double precision, intent(out)

dxi

)

Definition at line 5691 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_pseudo_current()

subroutine mod_thermal_emission::get_pseudo_current	(	integer, intent(in)	igrid,
		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), intent(out)	source
	)

Definition at line 994 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_radio_ff_source_opacity()

subroutine mod_thermal_emission::get_radio_ff_source_opacity	(	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)	source,
		double precision, dimension(ixi^s), intent(out)	kappa
	)

Definition at line 1022 of file mod_thermal_emission.t.

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 1807 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 1501 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_sph_intersection_image_bounds()

subroutine mod_thermal_emission::get_sph_intersection_image_bounds	(	double precision, intent(out)	ximin1,
		double precision, intent(out)	ximax1,
		double precision, intent(out)	ximin2,
		double precision, intent(out)	ximax2
	)

Definition at line 5622 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 1263 of file mod_thermal_emission.t.

Here is the call graph for this function:

get_sxr_image()

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

Definition at line 2163 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 6416 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 6455 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 2237 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 6436 of file mod_thermal_emission.t.

init_vectors_cartesian()

subroutine mod_thermal_emission::init_vectors_cartesian

Definition at line 7003 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 6922 of file mod_thermal_emission.t.

Here is the call graph for this function:

insertion_sort_segment_indices()

subroutine mod_thermal_emission::insertion_sort_segment_indices	(	double precision, dimension(:,:), intent(in)	segments,
		integer, dimension(:), intent(inout)	idx,
		integer, intent(in)	ilo,
		integer, intent(in)	ihi
	)

Definition at line 3677 of file mod_thermal_emission.t.

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 6012 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 6119 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_cart_dda_datresol()

subroutine mod_thermal_emission::integrate_euv_cart_dda_datresol	(	integer, intent(in)	nxif1,
		integer, intent(in)	nxif2,
		double precision, dimension(nxif1), intent(in)	xif1,
		double precision, dimension(nxif2), intent(in)	xif2,
		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 3807 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_cart_dda_thick_datresol()

subroutine mod_thermal_emission::integrate_euv_cart_dda_thick_datresol	(	integer, intent(in)	nxif1,
		integer, intent(in)	nxif2,
		double precision, dimension(nxif1), intent(in)	xif1,
		double precision, dimension(nxif2), intent(in)	xif2,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(nxif1,nxif2), intent(out)	euv,
		double precision, dimension(nxif1,nxif2), intent(out)	dpl,
		double precision, dimension(nxif1,nxif2), intent(out)	tau,
		double precision, dimension(nxif1,nxif2), intent(out)	euvthin
	)

Definition at line 3902 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 3198 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_sph_intersection_thick()

subroutine mod_thermal_emission::integrate_euv_sph_intersection_thick	(	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,
		double precision, dimension(numxi1,numxi2), intent(out)	euv,
		double precision, dimension(numxi1,numxi2), intent(out)	tau,
		double precision, dimension(numxi1,numxi2), intent(out)	euvthin
	)

Definition at line 5286 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_sph_intersection_thin()

subroutine mod_thermal_emission::integrate_euv_sph_intersection_thin	(	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,
		double precision, dimension(numxi1,numxi2), intent(inout)	em
	)

Definition at line 5203 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_euv_thick_datresol()

subroutine mod_thermal_emission::integrate_euv_thick_datresol	(	integer, intent(in)	nxif1,
		integer, intent(in)	nxif2,
		type(te_fluid), intent(in)	fl,
		double precision, dimension(nxif1,nxif2), intent(out)	euv,
		double precision, dimension(nxif1,nxif2), intent(out)	dpl,
		double precision, dimension(nxif1,nxif2), intent(out)	tau,
		double precision, dimension(nxif1,nxif2), intent(out)	euvthin
	)

Definition at line 4218 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 1964 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 1682 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 3038 of file mod_thermal_emission.t.

Here is the call graph for this function:

integrate_transfer_step_first_order()

subroutine mod_thermal_emission::integrate_transfer_step_first_order	(	double precision, intent(in)	emissivity,
		double precision, intent(in)	opacity,
		double precision, intent(in)	path_length,
		double precision, intent(inout)	intensity,
		double precision, intent(inout)	tau
	)

Definition at line 578 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 6278 of file mod_thermal_emission.t.

Here is the call graph for this function:

interpolate_response_value()

double precision function mod_thermal_emission::interpolate_response_value	(	double precision, intent(in)	temperature,
		double precision, dimension(n_table), intent(in)	t_table,
		double precision, dimension(n_table), intent(in)	f_table,
		integer, intent(in)	n_table,
		logical, intent(in)	log_temperature,
		logical, intent(in)	log_response
	)

Definition at line 729 of file mod_thermal_emission.t.

Here is the call graph for this function:

normalize_euv_doppler()

subroutine mod_thermal_emission::normalize_euv_doppler	(	integer, intent(in)	ni1,
		integer, intent(in)	ni2,
		double precision, dimension(ni1,ni2), intent(in)	euv,
		double precision, dimension(ni1,ni2), intent(inout)	dpl,
		double precision, intent(in)	unitv
	)

Definition at line 606 of file mod_thermal_emission.t.

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 6471 of file mod_thermal_emission.t.

Here is the call graph for this function:

pack_euv_image_outputs()

subroutine mod_thermal_emission::pack_euv_image_outputs	(	integer, intent(in)	ni1,
		integer, intent(in)	ni2,
		double precision, dimension(ni1,ni2), intent(in)	euv,
		double precision, dimension(:,:,:), intent(inout)	wi,
		double precision, intent(in)	smallflux,
		logical, intent(in)	has_doppler,
		logical, intent(in)	has_thick,
		double precision, dimension(ni1,ni2), intent(in), optional	dpl,
		double precision, dimension(ni1,ni2), intent(in), optional	tau,
		double precision, dimension(ni1,ni2), intent(in), optional	euvthin,
		logical, intent(in), optional	cap_absorption
	)

Definition at line 647 of file mod_thermal_emission.t.

Here is the call graph for this function:

postprocess_euv_instrument_image()

subroutine mod_thermal_emission::postprocess_euv_instrument_image	(	integer, intent(in)	nsrc1,
		integer, intent(in)	nsrc2,
		double precision, dimension(nsrc1), intent(in)	xsrc1,
		double precision, dimension(nsrc2), intent(in)	xsrc2,
		double precision, dimension(nsrc1), intent(in)	dxsrc1,
		double precision, dimension(nsrc2), intent(in)	dxsrc2,
		double precision, dimension(nsrc1,nsrc2), intent(in)	euv,
		double precision, dimension(nsrc1,nsrc2), intent(in)	dpl,
		integer, intent(out)	nout1,
		integer, intent(out)	nout2,
		double precision, dimension(:), intent(out), allocatable	xout1,
		double precision, dimension(:), intent(out), allocatable	xout2,
		double precision, dimension(:), intent(out), allocatable	dxout1,
		double precision, dimension(:), intent(out), allocatable	dxout2,
		double precision, dimension(:,:,:), intent(out), allocatable	wout,
		integer, intent(out)	numwout,
		double precision, dimension(nsrc1,nsrc2), intent(in), optional	tau,
		double precision, dimension(nsrc1,nsrc2), intent(in), optional	euvthin
	)

Definition at line 2290 of file mod_thermal_emission.t.

Here is the call graph for this function:

postprocess_radio_beam_image()

subroutine mod_thermal_emission::postprocess_radio_beam_image	(	integer, intent(in)	nsrc1,
		integer, intent(in)	nsrc2,
		double precision, dimension(nsrc1), intent(in)	xsrc1,
		double precision, dimension(nsrc2), intent(in)	xsrc2,
		double precision, dimension(nsrc1), intent(in)	dxsrc1,
		double precision, dimension(nsrc2), intent(in)	dxsrc2,
		double precision, dimension(nsrc1,nsrc2), intent(in)	bright,
		integer, intent(out)	nout1,
		integer, intent(out)	nout2,
		double precision, dimension(:), intent(out), allocatable	xout1,
		double precision, dimension(:), intent(out), allocatable	xout2,
		double precision, dimension(:), intent(out), allocatable	dxout1,
		double precision, dimension(:), intent(out), allocatable	dxout2,
		double precision, dimension(:,:,:), intent(out), allocatable	wout,
		integer, intent(out)	numwout,
		double precision, dimension(nsrc1,nsrc2), intent(in), optional	tau,
		double precision, dimension(nsrc1,nsrc2), intent(in), optional	brightthin
	)

Definition at line 2455 of file mod_thermal_emission.t.

Here is the call graph for this function:

pow10_clamped()

double precision function mod_thermal_emission::pow10_clamped

(

double precision, intent(in)

exponent

)

Definition at line 717 of file mod_thermal_emission.t.

Here is the call graph for this function:

quicksort_segment_indices()

recursive subroutine mod_thermal_emission::quicksort_segment_indices	(	double precision, dimension(:,:), intent(in)	segments,
		integer, dimension(:), intent(inout)	idx,
		integer, intent(in)	ilo,
		integer, intent(in)	ihi
	)

Definition at line 3695 of file mod_thermal_emission.t.

Here is the call graph for this function:

radsyn_euv_has_doppler_output()

logical function mod_thermal_emission::radsyn_euv_has_doppler_output

Definition at line 591 of file mod_thermal_emission.t.

Here is the call graph for this function:

radsyn_euv_num_outputs()

integer function mod_thermal_emission::radsyn_euv_num_outputs	(	logical, intent(in)	has_doppler,
		logical, intent(in)	has_thick
	)

Definition at line 597 of file mod_thermal_emission.t.

radsyn_get_segment_batch_limits()

subroutine mod_thermal_emission::radsyn_get_segment_batch_limits	(	integer, intent(out)	pixel_batch_target,
		integer, intent(out)	segment_batch_target,
		integer, intent(out)	segment_comm_target
	)

Definition at line 682 of file mod_thermal_emission.t.

ray_box_intersection_cart()

subroutine mod_thermal_emission::ray_box_intersection_cart	(	double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(1:3), intent(in)	ray_dir,
		double precision, dimension(1:3), intent(in)	box_min,
		double precision, dimension(1:3), intent(in)	box_max,
		logical, intent(out)	hit,
		double precision, intent(out)	t_enter,
		double precision, intent(out)	t_exit
	)

Definition at line 3389 of file mod_thermal_emission.t.

segment_is_valid()

logical function mod_thermal_emission::segment_is_valid	(	double precision, dimension(:,:), intent(in)	segments,
		integer, intent(in)	is,
		integer, intent(in)	nvars
	)

Definition at line 3738 of file mod_thermal_emission.t.

segment_pixel_owner()

integer function mod_thermal_emission::segment_pixel_owner

(

integer, intent(in)

pixel_id

)

Definition at line 3732 of file mod_thermal_emission.t.

solve_euv_saha_charge_state()

subroutine mod_thermal_emission::solve_euv_saha_charge_state	(	double precision, intent(in)	nh,
		double precision, intent(in)	te,
		double precision, intent(in)	rhe,
		double precision, intent(in)	ne_guess,
		double precision, intent(out)	x_hii,
		double precision, intent(out)	x_heii,
		double precision, intent(out)	x_heiii
	)

Definition at line 842 of file mod_thermal_emission.t.

Here is the call graph for this function:

sort_segment_indices_near_to_far()

subroutine mod_thermal_emission::sort_segment_indices_near_to_far	(	double precision, dimension(:,:), intent(in)	segments,
		integer, dimension(:), intent(inout)	idx,
		integer, intent(in)	nidx
	)

Definition at line 3664 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_add_phi_intersection()

subroutine mod_thermal_emission::sph_add_phi_intersection	(	double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(1:3), intent(in)	ray_dir,
		double precision, intent(in)	phiface,
		double precision, dimension(:), intent(inout), allocatable	tvals,
		integer, intent(inout)	nt,
		integer, intent(inout)	capacity
	)

Definition at line 4563 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_add_sphere_intersections()

subroutine mod_thermal_emission::sph_add_sphere_intersections	(	double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(1:3), intent(in)	ray_dir,
		double precision, intent(in)	rface,
		double precision, dimension(:), intent(inout), allocatable	tvals,
		integer, intent(inout)	nt,
		integer, intent(inout)	capacity
	)

Definition at line 4516 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_add_t()

subroutine mod_thermal_emission::sph_add_t	(	double precision, dimension(:), intent(inout), allocatable	tvals,
		integer, intent(inout)	nt,
		integer, intent(inout)	capacity,
		double precision, intent(in)	t
	)

Definition at line 4453 of file mod_thermal_emission.t.

sph_add_t_fixed()

subroutine mod_thermal_emission::sph_add_t_fixed	(	double precision, dimension(:), intent(inout)	tvals,
		integer, intent(inout)	nt,
		double precision, intent(in)	t
	)

Definition at line 4477 of file mod_thermal_emission.t.

sph_add_theta_intersections()

subroutine mod_thermal_emission::sph_add_theta_intersections	(	double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(1:3), intent(in)	ray_dir,
		double precision, intent(in)	thetaface,
		double precision, dimension(:), intent(inout), allocatable	tvals,
		integer, intent(inout)	nt,
		integer, intent(inout)	capacity
	)

Definition at line 4533 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_block_pixel_range()

subroutine mod_thermal_emission::sph_block_pixel_range	(	double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	thetaface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		integer, intent(in)	ixo,
		integer, intent(in)	l,
		integer, intent(in)	nxi1,
		integer, intent(in)	nxi2,
		double precision, dimension(nxi1), intent(in)	xi1,
		double precision, dimension(nxi2), intent(in)	xi2,
		double precision, intent(in)	dxi,
		integer, intent(out)	ixpmin1,
		integer, intent(out)	ixpmax1,
		integer, intent(out)	ixpmin2,
		integer, intent(out)	ixpmax2,
		logical, intent(out)	has_pixels
	)

Definition at line 4690 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_cart_to_coord()

subroutine mod_thermal_emission::sph_cart_to_coord	(	double precision, dimension(1:3), intent(in)	pos,
		double precision, dimension(1:3), intent(out)	sph
	)

Definition at line 4579 of file mod_thermal_emission.t.

sph_locate_cell()

subroutine mod_thermal_emission::sph_locate_cell	(	double precision, dimension(1:3), intent(in)	pos,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	thetaface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		integer, intent(in)	ixo,
		integer, intent(in)	l,
		integer, intent(out)	ix1,
		integer, intent(out)	ix2,
		integer, intent(out)	ix3,
		logical, intent(out)	inside
	)

Definition at line 4652 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_locate_cell_fast()

subroutine mod_thermal_emission::sph_locate_cell_fast	(	double precision, dimension(1:3), intent(in)	pos,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface2,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	theta_cos,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		integer, intent(in)	ixo,
		integer, intent(in)	l,
		integer, intent(out)	ix1,
		integer, intent(out)	ix2,
		integer, intent(out)	ix3,
		logical, intent(out)	inside
	)

Definition at line 4896 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_locate_index()

integer function mod_thermal_emission::sph_locate_index	(	double precision, intent(in)	value,
		double precision, dimension(imin:imax+1), intent(in)	faces,
		integer, intent(in)	imin,
		integer, intent(in)	imax
	)

Definition at line 4592 of file mod_thermal_emission.t.

sph_locate_index_desc()

integer function mod_thermal_emission::sph_locate_index_desc	(	double precision, intent(in)	value,
		double precision, dimension(imin:imax+1), intent(in)	faces,
		integer, intent(in)	imin,
		integer, intent(in)	imax
	)

Definition at line 4622 of file mod_thermal_emission.t.

sph_next_cell_exit()

subroutine mod_thermal_emission::sph_next_cell_exit	(	double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, dimension(ixomin1:ixomax1+1), intent(in)	rface2,
		double precision, dimension(ixomin2:ixomax2+1), intent(in)	theta_cos,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phiface,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_sin,
		double precision, dimension(ixomin3:ixomax3+1), intent(in)	phi_cos,
		integer, intent(in)	ixo,
		integer, intent(in)	l,
		integer, intent(in)	ix1,
		integer, intent(in)	ix2,
		integer, intent(in)	ix3,
		double precision, intent(in)	tnow,
		double precision, intent(in)	texit,
		double precision, intent(in)	epsray,
		double precision, intent(out)	tnext,
		logical, intent(out)	found
	)

Definition at line 4965 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_segment_visible()

logical function mod_thermal_emission::sph_segment_visible	(	double precision, dimension(1:3), intent(in)	pos,
		double precision, intent(in)	ximg1,
		double precision, intent(in)	ximg2
	)

Definition at line 4672 of file mod_thermal_emission.t.

Here is the call graph for this function:

sph_sort_unique_t()

subroutine mod_thermal_emission::sph_sort_unique_t	(	double precision, dimension(:), intent(inout)	tvals,
		integer, intent(inout)	nt
	)

Definition at line 4488 of file mod_thermal_emission.t.

sph_try_exit_candidate()

subroutine mod_thermal_emission::sph_try_exit_candidate	(	double precision, intent(in)	t,
		double precision, intent(in)	tnow,
		double precision, intent(in)	texit,
		double precision, intent(in)	epsray,
		double precision, intent(inout)	tnext,
		logical, intent(inout)	found
	)

Definition at line 4921 of file mod_thermal_emission.t.

sph_try_phi_exit_candidate()

subroutine mod_thermal_emission::sph_try_phi_exit_candidate	(	double precision, intent(in)	t,
		double precision, intent(in)	phi_face_sin,
		double precision, intent(in)	phi_face_cos,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	tnow,
		double precision, intent(in)	texit,
		double precision, intent(in)	epsray,
		double precision, intent(inout)	tnext,
		logical, intent(inout)	found
	)

Definition at line 4950 of file mod_thermal_emission.t.

sph_try_theta_exit_candidate()

subroutine mod_thermal_emission::sph_try_theta_exit_candidate	(	double precision, intent(in)	t,
		double precision, intent(in)	theta_face_cos,
		double precision, dimension(1:3), intent(in)	ray_origin,
		double precision, intent(in)	tnow,
		double precision, intent(in)	texit,
		double precision, intent(in)	epsray,
		double precision, intent(inout)	tnext,
		logical, intent(inout)	found
	)

Definition at line 4932 of file mod_thermal_emission.t.

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 6981 of file mod_thermal_emission.t.

transfer_attenuation()

double precision function mod_thermal_emission::transfer_attenuation

(

double precision, intent(in)

tau

)

Definition at line 695 of file mod_thermal_emission.t.

Here is the call graph for this function:

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 6581 of file mod_thermal_emission.t.

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 6716 of file mod_thermal_emission.t.

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.

ray_method_active

character(len=std_len) mod_thermal_emission::ray_method_active ='legacy'

Definition at line 421 of file mod_thermal_emission.t.

sph_use_dda

logical mod_thermal_emission::sph_use_dda =.false.

Definition at line 422 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.