gen_laguerre_exactness

gen_laguerre_exactness, a FORTRAN90 code which investigates the polynomial exactness of a generalized Gauss-Laguerre quadrature rule for the semi-infinite interval [0,oo) or [A,oo).

Standard generalized Gauss-Laguerre quadrature assumes that the integrand we are considering has a form like:

```        Integral ( A <= x < +oo ) x^alpha * exp(-x) * f(x) dx
```
where the factor x^alpha * exp(-x) is regarded as a weight factor.

A standard generalized Gauss-Laguerre quadrature rule is a set of n positive weights w and abscissas x so that

```        Integral ( A <= x < +oo ) x^alpha * exp(-x) * f(x) dx
```
may be approximated by
```        Sum ( 1 <= I <= N ) w(i) * f(x(i))
```

It is often convenient to consider approximating integrals in which the weighting factor x^alpha * exp(-x) is implicit. In that case, we are looking at approximating

```        Integral ( A <= x < +oo ) f(x) dx
```
and it is easy to modify a standard generalized Gauss-Laguerre quadrature rule to handle this case directly.

A modified generalized Gauss-Laguerre quadrature rule is a set of n positive weights w and abscissas x so that

```        Integral ( A <= x < +oo ) f(x) dx
```
may be approximated by
```        Sum ( 1 <= I <= N ) w(i) * f(x(i))
```

When using a generalized Gauss-Laguerre quadrature rule, it's important to know whether the rule has been developed for the standard or modified cases. Basically, the only change is that the weights of the modified rule have been divided by the weighting function evaluated at the corresponding abscissa.

For a standard generalized Gauss-Laguerre rule, polynomial exactness is defined in terms of the function f(x). That is, we say the rule is exact for polynomials up to degree DEGREE_MAX if, for any polynomial f(x) of that degree or less, the quadrature rule will produce the exact value of

```        Integral ( 0 <= x < +oo ) x^alpha * exp(-x) * f(x) dx
```

For a modified generalized Gauss-Laguerre rule, polynomial exactness is defined in terms of the function f(x) divided by the implicit weighting function. That is, we say a modified generalized Gauss-Laguerre rule is exact for polynomials up to degree DEGREE_MAX if, for any integrand f(x) with the property that f(x)/(x^alpha*exp(-x)) is a polynomial of degree no more than DEGREE_MAX, the quadrature rule will product the exact value of:

```        Integral ( 0 <= x < +oo ) f(x) dx
```

The program starts at DEGREE = 0, and then proceeds to DEGREE = 1, 2, and so on up to a maximum degree DEGREE_MAX specified by the user. At each value of DEGREE, the program generates the corresponding monomial term, applies the quadrature rule to it, and determines the quadrature error. The program uses a scaling factor on each monomial so that the exact integral should always be 1; therefore, each reported error can be compared on a fixed scale.

If the program understands that the rule being considered is a modified rule, then the monomials are multiplied by x^alpha * exp(-x) when performing the exactness test.

Since

```        Integral ( 0 <= x < +oo ) x^alpha * exp(-x) * xn dx = gamma(n+alpha+1)
```
our test monomial functions, in order to integrate to 1, will be normalized to:
```        Integral ( 0 <= x < +oo ) x^alpha * exp(-x) xn / gamma(n+alpha+1) dx
```
It should be clear that accuracy will be rapidly lost as n increases.

The program is very flexible and interactive. The quadrature rule is defined by three files, to be read at input, and the maximum degree top be checked is specified by the user as well.

Note that the three files that define the quadrature rule are assumed to have related names, of the form

• prefix_x.txt
• prefix_w.txt
• prefix_r.txt
When running the program, the user only enters the common prefix part of the file names, which is enough information for the program to find all three files.

The exactness results are written to an output file with the corresponding name:

• prefix_exact.txt

Usage:

gen_laguerre_exactness prefix degree_max alpha option
where
• prefix is the common prefix for the files containing the abscissa, weight and region information of the quadrature rule;
• degree_max is the maximum monomial degree to check. This would normally be a relatively small nonnegative number, such as 5, 10 or 15.
• alpha is the value of the parameter, which should be a real number greater than -1. Setting alpha to 0.0 results in the basic (non-generalized) Gauss-Laguerre rule.
• option:
0 indicates a standard rule for integrating x^alpha*exp(-x)*f(x).
1 indicates a modified rule for integrating f(x).

If the arguments are not supplied on the command line, the program will prompt for them.

Languages:

gen_laguerre_exactness is available in a C++ version and a Fortran90 version and a MATLAB version and an Octave version.

Related Data and Programs:

GEN_LAGUERRE_RULE, a FORTRAN90 code which can generate a generalized Gauss-Laguerre quadrature rule on request.

HERMITE_EXACTNESS, a FORTRAN90 code which tests the polynomial exactness of Gauss-Hermite quadrature rules.

LAGUERRE_EXACTNESS, a FORTRAN90 code which tests the polynomial exactness of Gauss-Laguerre quadrature rules for integration over [0,+oo) with density function exp(-x).

LEGENDRE_EXACTNESS, a FORTRAN90 code which tests the monomial exactness of quadrature rules for the Legendre problem of integrating a function with density 1 over the interval [-1,+1].

Reference:

1. Philip Davis, Philip Rabinowitz,
Methods of Numerical Integration,
Second Edition,
Dover, 2007,
ISBN: 0486453391,
LC: QA299.3.D28.

Source Code:

Last revised on 11 July 2020.