NAG FL Interface
s17alf (bessel_​zeros)

Settings help

FL Name Style:


FL Specification Language:


1 Purpose

s17alf determines the leading n zeros of one of the Bessel functions Jα(x), Yα(x), Jα(x) or Yα(x) for real x and non-negative α.

2 Specification

Fortran Interface
Subroutine s17alf ( a, n, mode, rel, x, ifail)
Integer, Intent (In) :: n, mode
Integer, Intent (Inout) :: ifail
Real (Kind=nag_wp), Intent (In) :: a, rel
Real (Kind=nag_wp), Intent (Out) :: x(n)
C Header Interface
#include <nag.h>
void  s17alf_ (const double *a, const Integer *n, const Integer *mode, const double *rel, double x[], Integer *ifail)
The routine may be called by the names s17alf or nagf_specfun_bessel_zeros.

3 Description

s17alf attempts to find the leading N zeros of one of the Bessel functions Jα(x), Yα(x), Jα(x) or Yα(x), where x is real. When α is real, these functions each have an infinite number of real zeros, all of which are simple with the possible exception of x=0. If α0, the nth positive zero is denoted by jα,n,jα,n,yα,n and yα,n, respectively, for n=1,2,,N, except that x=0 is counted as the first zero of Jα(x) when α=0. Since J0(x)=-J1(x), it, therefore, follows that j0,1=0 and j0,n=-j1,n-1 for n=2,3,,N-1. Further details can be found in Section 9.5 of Abramowitz and Stegun (1972).
s17alf is based on Algol 60 procedures given by Temme (1979). Initial approximations to the zeros are computed from asymptotic expansions. These are then improved by higher-order Newton iteration making use of the differential equation for the Bessel functions.

4 References

Abramowitz M and Stegun I A (1972) Handbook of Mathematical Functions (3rd Edition) Dover Publications
Temme N M (1976) On the numerical evaluation of the ordinary Bessel function of the second kind J. Comput. Phys. 21 343–350
Temme N M (1979) An algorithm with Algol 60 program for the computation of the zeros of ordinary Bessel functions and those of their derivatives J. Comput. Phys. 32 270–279

5 Arguments

1: a Real (Kind=nag_wp) Input
On entry: the order α of the function.
Constraint: 0.0a100000.0.
2: n Integer Input
On entry: the number N of zeros required.
Constraint: n1.
3: mode Integer Input
On entry: specifies the form of the function whose zeros are required.
mode=1
The zeros of Jα(x) are required.
mode=2
The zeros of Yα(x) are required;
mode=3
The zeros of Jα(x) are required;
mode=4
The zeros of Yα(x) are required.
Constraint: 1mode4.
4: rel Real (Kind=nag_wp) Input
On entry: the relative accuracy to which the zeros are required.
Suggested value: the square root of the machine precision.
Constraint: rel>0.0.
5: x(n) Real (Kind=nag_wp) array Output
On exit: the N required zeros of the function specified by mode.
6: ifail Integer Input/Output
On entry: ifail must be set to 0, −1 or 1 to set behaviour on detection of an error; these values have no effect when no error is detected.
A value of 0 causes the printing of an error message and program execution will be halted; otherwise program execution continues. A value of −1 means that an error message is printed while a value of 1 means that it is not.
If halting is not appropriate, the value −1 or 1 is recommended. If message printing is undesirable, then the value 1 is recommended. Otherwise, the value 0 is recommended. When the value -1 or 1 is used it is essential to test the value of ifail on exit.
On exit: ifail=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6 Error Indicators and Warnings

If on entry ifail=0 or −1, explanatory error messages are output on the current error message unit (as defined by x04aaf).
Errors or warnings detected by the routine:
ifail=1
On entry, a=value.
Constraint: a100000.0.
On entry, a=value.
Constraint: a0.0.
On entry, mode=value.
Constraint: mode4.
On entry, mode=value.
Constraint: mode1.
On entry, n=value.
Constraint: n1.
On entry, rel=value.
Constraint: rel>0.0.
ifail=-99
An unexpected error has been triggered by this routine. Please contact NAG.
See Section 7 in the Introduction to the NAG Library FL Interface for further information.
ifail=-399
Your licence key may have expired or may not have been installed correctly.
See Section 8 in the Introduction to the NAG Library FL Interface for further information.
ifail=-999
Dynamic memory allocation failed.
See Section 9 in the Introduction to the NAG Library FL Interface for further information.

7 Accuracy

If the value of rel is set to 10-d, then the required zeros should have approximately d correct significant digits.

8 Parallelism and Performance

Background information to multithreading can be found in the Multithreading documentation.
s17alf is not threaded in any implementation.

9 Further Comments

None.

10 Example

This example determines the leading five positive zeros of the Bessel function J0(x).

10.1 Program Text

Program Text (s17alfe.f90)

10.2 Program Data

Program Data (s17alfe.d)

10.3 Program Results

Program Results (s17alfe.r)