analytic_1p1_photon_pad Module Reference

Functions/Subroutines
subroutine	driver (ifail)
subroutine	calculate_beta_two_photon (no_intermediate_states, index_final_state, amplitudes, dipoles, lab_frame_p1, lab_frame_p2, lab_frame_e_p2, ionization_potential, escat, beta)
subroutine	print_beta_two_photon (beta, energies_first)
subroutine	get_dipoles (dip_elm, ichl, evchl, lvchl, mvchl, no_channels, escat, no_dipole_components, dipole_component_order, bound_state_energies, target_energy, lu_pw_dipoles, nset_pw_dipoles, format_pw_dipoles, ifail)

Variables
integer, parameter	iwrite = 6
integer, parameter	max_intermediate_states = 10
logical	use_dummy_dipoles = .false.
logical	bound_transition_chiral = .true.
logical	continuum_transition_chiral = .true.

Function/Subroutine Documentation

calculate_beta_two_photon()

subroutine analytic_1p1_photon_pad::calculate_beta_two_photon	(	integer, intent(in)	no_intermediate_states,
		integer, intent(in)	index_final_state,
		complex(kind=idp), dimension(1:3,1:max_intermediate_states)	amplitudes,
		complex(kind=idp), dimension(:,:,:,:,:), allocatable	dipoles,
		integer, intent(in)	lab_frame_p1,
		integer, intent(in)	lab_frame_p2,
		real(kind=idp), dimension(3), intent(in)	lab_frame_e_p2,
		real(kind=idp), intent(in)	ionization_potential,
		real(kind=idp), dimension(size(dipoles,3)), intent(in)	escat,
		complex(kind=idp), dimension(:,:), allocatable	beta )

Here is the call graph for this function:

driver()

subroutine analytic_1p1_photon_pad::driver

(

integer, intent(out)

ifail

)

Here is the call graph for this function:

get_dipoles()

subroutine analytic_1p1_photon_pad::get_dipoles	(	complex(kind=icp), dimension(:,:,:,:), allocatable	dip_elm,
		integer, dimension(:,:), allocatable	ichl,
		real(kind=idp), dimension(:,:), allocatable	evchl,
		integer, dimension(:,:), allocatable	lvchl,
		integer, dimension(:,:), allocatable	mvchl,
		integer, dimension(maxprop_par)	no_channels,
		real(kind=idp), dimension(:), allocatable	escat,
		integer	no_dipole_components,
		character(len=1), dimension(maxprop_par)	dipole_component_order,
		real(kind=idp), dimension(:), allocatable	bound_state_energies,
		real(kind=idp)	target_energy,
		integer, dimension(maxprop_par)	lu_pw_dipoles,
		integer, dimension(maxprop_par)	nset_pw_dipoles,
		character(len=11)	format_pw_dipoles,
		integer	ifail )

Here is the call graph for this function:

print_beta_two_photon()

subroutine analytic_1p1_photon_pad::print_beta_two_photon	(	complex(kind=idp), dimension(:,:), intent(in)	beta,
		logical, intent(in)	energies_first )

Here is the call graph for this function:

Variable Documentation

bound_transition_chiral

logical analytic_1p1_photon_pad::bound_transition_chiral = .true.

continuum_transition_chiral

logical analytic_1p1_photon_pad::continuum_transition_chiral = .true.

iwrite

integer, parameter analytic_1p1_photon_pad::iwrite = 6

max_intermediate_states

integer, parameter analytic_1p1_photon_pad::max_intermediate_states = 10

use_dummy_dipoles

logical analytic_1p1_photon_pad::use_dummy_dipoles = .false.