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. More...
subroutine	multidip_special::calculate_t_matrix (K, T, nopen)
	Calculate T-matrix from K-matrix. More...
subroutine	multidip_special::calculate_s_matrix (T, S, nopen)
	Calculate S-matrix from T-matrix. More...
subroutine	multidip_special::scatak (rmatr, eig, etot, w, Ek, l, Km, Ak)
	Photoionization coefficient. More...
real(wp) function	multidip_special::cphase (Z, l, k)
	Coulomb phase. More...
recursive complex(wp) function	multidip_special::complex_gamma (l, x)
	Complex Gamma function. More...
subroutine	multidip_special::coul (Z, l, Ek, r, F, Fp, G, Gp)
	Coulomb functions. More...
complex(wp) function	multidip_special::coulh (Z, s, l, Ek, r)
	Coulomb-Hankel function. More...
complex(wp) function	multidip_special::coulh_asy (Z, s, l, Ek, r)
	Coulomb-Hankel function (asymptotic form) More...
subroutine	multidip_special::coul_gsl (Z, l, Ek, r, F, Fp, G, Gp)
	Coulomb functions (GSL) More...
subroutine	multidip_special::coul_ukrmol (Z, l, Ek, r, F, Fp, G, Gp)
	Coulomb functions (UKRmol) More...
subroutine	multidip_special::diagonalize_symm_matrix (M, eigs, eigv, check)
	Diagonalize a real symmetric matrix. More...
subroutine	multidip_special::invert_matrix (T)
	Invert a complex matrix. More...
subroutine	multidip_special::solve_complex_system (n, A, X, Y)
	Solve system of equations with complex matrix. More...
logical function	multidip_special::next_permutation (p)
	Construct or advance permutation. More...
subroutine	multidip_special::swap (a, b)
	Exchange value of two integers. More...
subroutine	multidip_special::reverse (a)
	Reverse order of elements in array. More...
subroutine	multidip_special::kahan_add (X, dX, err)
	Compensated summation. More...
real(wp) function	multidip_special::beta_contraction_tensor (J, n, p, li, mi, qi, lj, mj, qj)
	Angular part of the beta parameters. More...
recursive real(wp) function	multidip_special::wigner_d_multiint (n, l, a, b, lp, ap, bp)
	Orientation averaging. More...
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. More...
real(wp) function	multidip_special::beta_2p_demekhin (L, p1, p2, li, mi, q1i, q2i, lj, mj, q1j, q2j)
	Two-photon asymmetry parameter. More...
real(wp) recursive function	multidip_special::cartesian_vector_component_product_average (q)
	Return Cartesian invariant. More...