CLEBSCH_GORDAN
Quantum Mechanics Coefficient Functions

CLEBSCH_GORDAN is a FORTRAN77 library which evaluates certain coefficient functions used in quantum mechanics.

Note that MATHEMATICA includes the commands ClebschGordan, ThreeJSymbol, and SixJSymbol, which can be used to evaluate the Clebsch Gordon, Wigner 3J and Wigner 6J functions.

Related Programs:

GSL, a C++ library which evaluates many special functions.

SLATEC, a FORTRAN90 library which includes routines to evaluate the Clebsch Gordon, Wigner 3J and Wigner 6J functions.

TEST_VALUES, a FORTRAN77 library which contains a few test values of many functions.

Reference:

1. Milton Abramowitz, Irene Stegun,
   Handbook of Mathematical Functions,
   National Bureau of Standards, 1964,
   ISBN: 0-486-61272-4,
   LC: QA47.A34.
2. Albert Messiah,
   Quantum Mechanics,
   Volume II,
   North Holland, 1963,
   ISBN13: 978-0486409245,
   LC: QC174.1.M413
3. Stephen Wolfram,
   The Mathematica Book,
   Fourth Edition,
   Cambridge University Press, 1999,
   ISBN: 0-521-64314-7,
   LC: QA76.95.W65.

Source Code:

• clebsch_gordan.f, the source code;
• clebsch_gordan.sh, commands to compile the source code;

Examples and Tests:

• clebsch_gordan_prb.f, a sample calling program;
• clebsch_gordan_prb.sh, commands to compile, link and run the sample calling program;
• clebsch_gordan_prb_output.txt, the sample output.

List of Routines:

• COF3J evaluates the Wigner 3J coefficients.
• COF6J evaluates the Wigner 6J coefficients.
• COF9J evaluates the Wigner 9J coefficients.
• FACALC calculates log factorials and saves them in common.
• I4_SWAP switches two I4's.
• PHASEF returns 1 for even arguments and -1 for odd ones.
• RACAH ???
• S6J ???
• SIX_J_VALUES returns some values of the Wigner 6J function.
• THREE_J_VALUES returns some values of the Wigner 3J function.
• TIMESTAMP prints out the current YMDHMS date as a timestamp.
• VCC evaluates the Racah V coefficient.
• WINEJ ???

You can go up one level to the FORTRAN77 source codes.