multidip_special.F90 File Reference

Go to the source code of this file.

Data Types
interface	multidip_special::cphaz
interface	multidip_special::coulfg
interface	multidip_special::couln
interface	multidip_special::decay
interface	multidip_special::dgemm
interface	multidip_special::dgemv
interface	multidip_special::dsyev
interface	multidip_special::dgetrf
interface	multidip_special::dgetrs
interface	multidip_special::zgemm
interface	multidip_special::zgemv
interface	multidip_special::zgetrf
interface	multidip_special::zgetrs
interface	multidip_special::zgetri

Modules
module	multidip_special
	Special functions and objects used by MULTIDIP.

Functions/Subroutines
subroutine	multidip_special::calculate_R_matrix (nchan, nstat, wmat, eig, etot, rmat)
	Calculate scattering R-matrix.
subroutine	multidip_special::calculate_T_matrix (k, t, nopen)
	Calculate T-matrix from K-matrix.
subroutine	multidip_special::calculate_S_matrix (t, s, nopen)
	Calculate S-matrix from T-matrix.
subroutine	multidip_special::scatAk (rmatr, eig, etot, w, ek, l, km, ak)
	Photoionization coefficient.
real(wp) function	multidip_special::cphase (z, l, k)
	Coulomb phase.
recursive complex(wp) function	multidip_special::complex_gamma (l, x)
	Complex Gamma function.
subroutine	multidip_special::coul (z, l, ek, r, f, fp, g, gp)
	Coulomb functions.
complex(wp) function	multidip_special::coulH (z, s, l, ek, r)
	Coulomb-Hankel function.
complex(wp) function	multidip_special::coulH_asy (z, s, l, ek, r)
	Coulomb-Hankel function (asymptotic form)
subroutine	multidip_special::coul_gsl (z, l, ek, r, f, fp, g, gp)
	Coulomb functions (GSL)
subroutine	multidip_special::coul_ukrmol (z, l, ek, r, f, fp, g, gp)
	Coulomb functions (UKRmol)
subroutine	multidip_special::diagonalize_symm_matrix (m, eigs, eigv, check)
	Diagonalize a real symmetric matrix.
subroutine	multidip_special::invert_matrix (t)
	Invert a complex matrix.
subroutine	multidip_special::solve_complex_system (n, a, x, y)
	Solve system of equations with complex matrix.
logical function	multidip_special::next_permutation (p)
	Construct or advance permutation.
subroutine	multidip_special::swap (a, b)
	Exchange value of two integers.
subroutine	multidip_special::reverse (a)
	Reverse order of elements in array.
subroutine	multidip_special::kahan_add (x, dx, err)
	Compensated summation.
real(wp) function	multidip_special::beta_contraction_tensor (j, n, p, li, mi, qi, lj, mj, qj)
	Angular part of the beta parameters.
recursive real(wp) function	multidip_special::wigner_D_multiint (n, l, a, b, lp, ap, bp)
	Orientation averaging.
real(wp) function	multidip_special::beta_2p_arb_pol_sph_harm (lbig, mbig, n, pb, lp, mp, qb, pa, l, m, qa)
	Two-photon asymmetry parameter for the arbitrary polarized case.
real(wp) function	multidip_special::beta_2p_demekhin (l, p1, p2, li, mi, q1i, q2i, lj, mj, q1j, q2j)
	Two-photon asymmetry parameter.
real(wp) recursive function	multidip_special::cartesian_vector_component_product_average (q)
	Return Cartesian invariant.