|
subroutine | coupling_obj_gbl::read_prec_cgaunt (this, path) |
|
subroutine | coupling_obj_gbl::precalculate_cgaunt (this, l1m) |
|
integer function | coupling_obj_gbl::m2_limit (l1, l2, l3, m2, m3) |
| This routine determines the limit on m2 for the Gaunt coefficients which have been stored and also the smallest possible m2 compatible with the symmetries of the given Gaunt coefficient. We don't need to know the value of m1 since that is uniquely determined from: m1 = -m2-m3. This routine is the function b(l1,l2,l3,m3) from the paper of Pinchon (2007). More...
|
|
subroutine | coupling_obj_gbl::cgaunt_string (gaunt_cf, l_min, l_max, l2, l3, m1, m2, m3) |
| Calculates a string of (complex) Gaunt coefficients for the given values of l2,l3,m1,m2,m3. The returned values are l_min,l_max which are the range of allowed l1 values and the array gaunt_cf containing the Gaunt coefficient for each allowed l1, e.g. gaunt_cf(l1) = <l1,m1|l2,m2|l3,m3>. More...
|
|
subroutine | coupling_obj_gbl::get_l_bounds_rg (l2, l3, m2, m3, l_min, l_max) |
|
subroutine | coupling_obj_gbl::precalculate_G_coeff (this, l1m) |
|
real(kind=cfp) function | coupling_obj_gbl::G_coeff (this, l1, l2, m1, m2, m3) |
|