[ < ] | [ > ] |  | [ << ] | [ Up ] | [ >> ] |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

# 22. Quadrature

22.1 Functions of One Variable |  |
22.2 Orthogonal Collocation |  |

[ < ] | [ > ] |  | [ << ] | [ Up ] | [ >> ] |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

## 22.1 Functions of One Variable

Loadable Function: [v, ier, nfun, err] = quad (f, a, b, tol, sing)
  Integrate a nonlinear function of one variable using Quadpack. The first argument is the name of the function, the function handle or the inline function to call to compute the value of the integrand. It must have the form

      y = f (x)

  where y and x are scalars.

  The second and third arguments are limits of integration. Either or both may be infinite.

  The optional argument tol is a vector that specifies the desired accuracy of the result. The first element of the vector is the desired absolute tolerance, and the second element is the desired relative tolerance. To choose a relative test only, set the absolute tolerance to zero. To choose an absolute test only, set the relative tolerance to zero.

  The optional argument sing is a vector of values at which the integrand is known to be singular.

  The result of the integration is returned in v and ier contains an integer error code (0 indicates a successful integration). The value of nfun indicates how many function evaluations were required, and err contains an estimate of the error in the solution.

  You can use the function `quad_options` to set optional parameters for `quad`.

Loadable Function: quad_options (opt, val)
  When called with two arguments, this function allows you set options parameters for the function `quad`. Given one argument, `quad_options` returns the value of the corresponding option. If no arguments are supplied, the names of all the available options and their current values are displayed.

  Options include

  `"absolute tolerance"`
    Absolute tolerance; may be zero for pure relative error test.
  `"relative tolerance"`
    Nonnegative relative tolerance. If the absolute tolerance is zero, the relative tolerance must be greater than or equal to `max (50*eps, 0.5e-28)`.

Here is an example of using `quad` to integrate the function

      f(x) = x * sin (1/x) * sqrt (abs (1 - x))

from x = 0 to x = 3.

This is a fairly difficult integration (plot the function over the range of integration to see why).

The first step is to define the function:

    function y = f (x)
      y = x .* sin (1 ./ x) .* sqrt (abs (1 - x));
    endfunction

Note the use of the `dot' forms of the operators. This is not necessary for the call to `quad`, but it makes it much easier to generate a set of points for plotting (because it makes it possible to call the function with a vector argument to produce a vector result).

Then we simply call quad:

    [v, ier, nfun, err] = quad ("f", 0, 3)
         => 1.9819
         => 1
         => 5061
         => 1.1522e-07

Although `quad` returns a nonzero value for ier, the result is reasonably accurate (to see why, examine what happens to the result if you move the lower bound to 0.1, then 0.01, then 0.001, etc.).

[ < ] | [ > ] |  | [ << ] | [ Up ] | [ >> ] |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

## 22.2 Orthogonal Collocation

Loadable Function: [r, amat, bmat, q] = colloc (n, "left", "right")
  Compute derivative and integral weight matrices for orthogonal collocation using the subroutines given in J. Villadsen and M. L. Michelsen, Solution of Differential Equation Models by Polynomial Approximation.

Here is an example of using `colloc` to generate weight matrices for solving the second order differential equation u' - alpha * u" = 0 with the boundary conditions u(0) = 0 and u(1) = 1.

First, we can generate the weight matrices for n points (including the endpoints of the interval), and incorporate the boundary conditions in the right hand side (for a specific value of alpha).

    n = 7;
    alpha = 0.1;
    [r, a, b] = colloc (n-2, "left", "right");
    at = a(2:n-1,2:n-1);
    bt = b(2:n-1,2:n-1);
    rhs = alpha * b(2:n-1,n) - a(2:n-1,n);

Then the solution at the roots r is

    u = [ 0; (at - alpha * bt) \ rhs; 1]
         => [ 0.00; 0.004; 0.01 0.00; 0.12; 0.62; 1.00 ]

[ << ] | [ >> ] |  |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

This document was generated by John W. Eaton on May, 18 2005 using texi2html