DQC36J(3)

SYNOPSIS
SUBROUTINE DQC36J (LUN, KPRINT, IPASS)

NAME
dqc36j - THIS IS A QUICK CHECK PROGRAM FOR THE SUBROUTINES DRC3JJ, DRC3JM, AND DRC6J, WHICH CALCULATE THE WIGNER COEFFICIENTS, 3J AND 6J.

LIBRARY
SLATEC

CATEGORY
C19

TYPE
DOUBLE PRECISION (QC36J-S, DQC36J-D)

KEYWORDS
3J COEFFICIENTS, 3J SYMBOLS, 6J COEFFICIENTS, 6J SYMBOLS, CLEBSCH-GORDAN COEFFICIENTS, QUICK CHECK, RACAH COEFFICIENTS, VECTOR ADDITION COEFFICIENTS, WIGNER COEFFICIENTS

AUTHOR
LOZIER, DANIEL W., (NIST) MCCLAIN, MARJORIE A., (NIST) SMITH, JOHN M., (NIST AND GEORGE MASON UNIVERSITY)

REFERENCES
MESSIAH, ALBERT., QUANTUM MECHANICS, VOLUME II, NORTH-HOLLAND PUBLISHING COMPANY, 1963.

ROUTINES CALLED
D1MACH, DRC3JJ, DRC3JM, DRC6J, NUMXER, XERCLR, XSETF

REVISION HISTORY (YYMMDD)
891129 DATE WRITTEN
910415 Mixed type expressions eliminated; precision of output formats made uniform for all tests; detail added to output when KPRINT=2 and a test fails; name of quick check added to output when KPRINT=3 or KPRINT=2 and a test fails; some output formats modified for clarity or adherence to SLATEC guidelines. These changes were done by D. W. Lozier.
930115 Replaced direct calculation of 3j-6j symbols in tests 1, 2, and 4 with values stored in data statements. This involved removing all calls to subroutine DRACAH. These changes were made by M. McClain.