CQCBJ(3)

SYNOPSIS
SUBROUTINE CQCBJ (LUN, KPRINT, IPASS)

NAME
cqcbj - Quick check for SLATEC subroutine CBESJ

LIBRARY
SLATEC

CATEGORY
C10A4

TYPE
COMPLEX (CQCBJ-C, ZQCBJ-Z)

KEYWORDS
QUICK CHECK, CBESJ

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

DESCRIPTION
*Usage: INTEGER LUN, KPRINT, IPASS CALL CQCBJ (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: CQCBJ is a quick check routine for the complex J Bessel function generated by subroutine CBESJ. CQCBJ generates sequences of J Bessel functions from CBESJ 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 CBESJ 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
CBESH, CBESJ, I1MACH, R1MACH

REVISION HISTORY (YYMMDD)
830501 DATE WRITTEN
890831 Revised to meet new SLATEC standards