NAG Library Routine Document

d01tef  (dim1_gauss_recm)

 Contents

    1  Purpose
    7  Accuracy

1
Purpose

Given the 2n+l moments of the weight function, d01tef generates the recursion coefficients needed by d01tdf to calculate a Gaussian quadrature rule.

2
Specification

Fortran Interface
Subroutine d01tef ( n, mu, a, b, c, ifail)
Integer, Intent (In):: n
Integer, Intent (Inout):: ifail
Real (Kind=nag_wp), Intent (In):: mu(0:2*n)
Real (Kind=nag_wp), Intent (Out):: a(n), b(n), c(n)
C Header Interface
#include nagmk26.h
void  d01tef_ ( const Integer *n, const double mu[], double a[], double b[], double c[], Integer *ifail)

3
Description

d01tef should only be used if the three-term recurrence cannot be determined analytically. A system of equations are formed, using the moments provided. This set of equations becomes ill-conditioned for moderate values of n, the number of abscissae and weights required. In most implementations quadruple precision calculation is used to maintain as much accuracy as possible.

4
References

Golub G H and Welsch J H (1969) Calculation of Gauss quadrature rules Math. Comput. 23 221–230

5
Arguments

1:     n – IntegerInput
On entry: n, the number of weights and abscissae required.
Constraint: n>0.
2:     mu0:2*n – Real (Kind=nag_wp) arrayInput
On entry: mui must contain the value of the moment with respect to xi i.e., wxxi dx, for i=0,1,,2n.
3:     an – Real (Kind=nag_wp) arrayOutput
On exit: values helping define the three term recurrence used by d01tdf.
4:     bn – Real (Kind=nag_wp) arrayOutput
On exit: values helping define the three term recurrence used by d01tdf.
5:     cn – Real (Kind=nag_wp) arrayOutput
On exit: values helping define the three term recurrence used by d01tdf.
6:     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).

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
The number of weights and abscissae requested (n) is less than 1: n=value.
ifail=2
The problem is too ill conditioned, it breaks down at row value.
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.

7
Accuracy

Internally quadruple precision is used to minimize loss of accuracy as much as possible.

8
Parallelism and Performance

d01tef is not threaded in any implementation.

9
Further Comments

Because the routine cannot check the validity of all the data presented, the user is advised to independently check the result, perhaps by integrating a function whose integral is known, using d01tef and subsequently d01tdf, to compare answers.

10
Example

This example program uses d01tef and moments to calculate a three-term recurrence relationship appropriate for Gauss–Legendre quadrature. It then uses the recurrence relationship to derive the weights and abscissae by calling d01tdf.

10.1
Program Text

Program Text (d01tefe.f90)

10.2
Program Data

None.

10.3
Program Results

Program Results (d01tefe.r)

© The Numerical Algorithms Group Ltd, Oxford, UK. 2017