ZQCBJ(3)

SYNOPSIS
SUBROUTINE ZQCBJ (LUN, KPRINT, IPASS)

NAME
zqcbj - Quick check for SLATEC subroutine ZBESJ

LIBRARY
SLATEC

CATEGORY
C10A4

TYPE
COMPLEX (CQCBJ-C, ZQCBJ-Z)

KEYWORDS
QUICK CHECK, ZBESJ

AUTHOR
Amos, Don, (SNL) Goudy, Sue, (SNL) Walton, Lee, (SNL)

DESCRIPTION
*Usage: INTEGER LUN, KPRINT, IPASS CALL ZQCBJ (LUN, KPRINT, IPASS) *Arguments: LUN :IN is the unit number to which output is to be written. KPRINT :IN controls the amount of output, as specified in the SLATEC Guidelines. IPASS :OUT indicates whether the test passed or failed. A value of one is good, indicating no failures. *Description: *** A DOUBLE PRECISION ROUTINE *** ZQCBJ is a quick check routine for the complex J Bessel function generated by subroutine ZBESJ. ZQCBJ generates sequences of J Bessel functions from ZBESJ and checks them against the evaluation from the formula J(FNU,Z) = 0.5*( H(1,FNU,Z) + H(2,FNU,Z) ) where -PI.lt.arg(Z).le.PI for abs(Z).ge.FNU. For abs(Z).lt.FNU, the first N members of a sequence of length N+16 are checked against a corresponding N member sequence where both sequences are generated by ZBESJ beginning at order FNU.

REFERENCES
Abramowitz, M. and Stegun, I. A., Handbook of Mathematical Functions, Dover Publications, New York, 1964. Amos, D. E., A Subroutine Package for Bessel Functions of a Complex Argument and Nonnegative Order, SAND85-1018, May, 1985.

ROUTINES CALLED
ZBESH, ZBESJ, ZABS, ZEXP, I1MACH, D1MACH

REVISION HISTORY (YYMMDD)
830501 DATE WRITTEN
890831 Revised to meet new SLATEC standards
930122 Added ZEXP to EXTERNAL statement. (RWC)