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 3526 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 4744 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 3578 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 781 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 3427 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 4435 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 3504 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 3756 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 3486 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 3458 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 6996 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 426 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 3606 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 5036 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 5112 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 4790 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 6916 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 6908 of file mod_thermal_emission.t.

exp_clamped()

double precision function mod_thermal_emission::exp_clamped

(

double precision, intent(in)

argument

)

Definition at line 704 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 624 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 7060 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 7046 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 1195 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 893 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 2086 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 797 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 1428 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 1351 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 1323 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 5764 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 2614 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 1061 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 5721 of file mod_thermal_emission.t.

get_native_datresol_spacing()

subroutine mod_thermal_emission::get_native_datresol_spacing

(

double precision, intent(out)

dxi

)

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

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 993 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 1021 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 1810 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 1504 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 5625 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 1262 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 2166 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 6420 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 6459 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 2240 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 6440 of file mod_thermal_emission.t.

init_vectors_cartesian()

subroutine mod_thermal_emission::init_vectors_cartesian

Definition at line 7007 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 6926 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 3680 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 6015 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 6122 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 3810 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 3905 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 3201 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 5289 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 5206 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 4221 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 1967 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 1685 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 3041 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 577 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 6281 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 728 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 605 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 6475 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 646 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 2293 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 2458 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 716 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 3698 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 590 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 596 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 681 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 3392 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 3741 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 3735 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 841 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 3667 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 4566 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 4519 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 4456 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 4480 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 4536 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 4693 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 4582 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 4655 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 4899 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 4595 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 4625 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 4968 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 4675 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 4491 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 4924 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 4953 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 4935 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 6985 of file mod_thermal_emission.t.

transfer_attenuation()

double precision function mod_thermal_emission::transfer_attenuation

(

double precision, intent(in)

tau

)

Definition at line 694 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 6585 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 6720 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 420 of file mod_thermal_emission.t.

sph_use_dda

logical mod_thermal_emission::sph_use_dda =.false.

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