s17alf : NAG Library, Mark 26

s17alf determines the leading

n

zeros of one of the Bessel functions

J_{α} (x)

Y_{α} (x)

J_{α}^{'} (x)

Y_{α}^{'} (x)

for real

x

and non-negative

α

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 nagmk26.h

void	s17alf_ ( const double a, const Integer n, const Integer mode, const double rel, double x[], Integer *ifail)

Description

s17alf attempts to find the leading

N

zeros of one of the Bessel functions

J_{α} (x)

Y_{α} (x)

J_{α}^{'} (x)

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

α \geq 0

, the

n

th positive zero is denoted by

j_{α, n}, j_{α, n}^{'}, y_{α, n}

and

y_{α, n}^{'}

, respectively, for

n = 1, 2, \dots, N

, except that

x = 0

is counted as the first zero of

J_{α}^{'} (x)

when

α = 0

. Since

J_{0}^{'} (x) = - J_{1} (x)

, it therefore follows that

j_{0, 1}^{'} = 0

and

j_{0, n}^{'} = - j_{1, n - 1}

for

n = 2, 3, \dots, 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.

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

Arguments

a

– Real (Kind=nag_wp)Input

On entry: the order

α

of the function.

Constraint:

0.0 \leq a \leq 100000.0

n

– IntegerInput

On entry: the number

N

of zeros required.

Constraint:

n \geq 1

mode

– IntegerInput

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:

1 \leq mode \leq 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

x (n)

– Real (Kind=nag_wp) arrayOutput

On exit: the

N

required zeros of the function specified by mode.

ifail

– IntegerInput/Output

On entry: ifail must be set to

0

- 1 ​ or ​ 1

. If you are unfamiliar with this argument you should refer to Section 3.4 in How to Use the NAG Library and its Documentation for details.

For environments where it might be inappropriate to halt program execution when an error is detected, the value

- 1 ​ or ​ 1

is recommended. If the output of error messages is undesirable, then the value

1

is recommended. Otherwise, if you are not familiar with this argument, the recommended value is

0

. 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).

Error Indicators and Warnings

If on entry

ifail = 0

- 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 < 0.0$ ,
or	$a > 100000.0$ ,
or	$n \leq 0$ ,
or	$mode < 1$ ,
or	$mode > 4$ ,
or	$rel \leq 0.0$ .

ifail = - 99

An unexpected error has been triggered by this routine. Please contact NAG.

See Section 3.9 in How to Use the NAG Library and its Documentation for further information.

ifail = - 399

Your licence key may have expired or may not have been installed correctly.

See Section 3.8 in How to Use the NAG Library and its Documentation for further information.

ifail = - 999

Dynamic memory allocation failed.

See Section 3.7 in How to Use the NAG Library and its Documentation for further information.

NAG Library Routine Document

s17alf (bessel_zeros)

▸▿ Contents

1

Purpose

2

Specification

3

Description

4

References

5

Arguments

6

Error Indicators and Warnings

7

Accuracy

8

Parallelism and Performance

9

Further Comments

10

Example

10.1

Program Text

10.2

Program Data

10.3

Program Results

NAG Library Routine Document

s17alf (bessel_zeros)

▸▿ Contents

1 Purpose

2 Specification

3 Description

4 References

5 Arguments

6 Error Indicators and Warnings

7 Accuracy

8 Parallelism and Performance

9 Further Comments

10 Example

10.1 Program Text

10.2 Program Data

10.3 Program Results

1

Purpose

2

Specification

3

Description

4

References

5

Arguments

6

Error Indicators and Warnings

7

Accuracy

8

Parallelism and Performance

9

Further Comments

10

Example

10.1

Program Text

10.2

Program Data

10.3

Program Results