TEST_TET_INT
Test Functions for Tetrahedron Integration

TEST_TET_INT is a library of FORTRAN90 routines, using double precision arithmetic, which defines a number of test functions to be integrated over a tetrahedron.

It is possible to invoke a particular function by number, or to try out all available functions, as demonstrated in the sample calling program.

For convenience, all the integrand functions have been scaled by a constant, so that the integral of the function over the specific domain is exactly 1.

The test functions include F(X,Y)=

1. 1 on the unit triangle.
2. x on the unit triangle.

The library includes a routines to define the integrand function, the tetrahedron over which the integral is to be carried out, and a title for the problem. Thus, for each integrand function, four routines are supplied. For instance, for function #4, we have the routines:

• P04_FUN evaluates the integrand for problem 4.
• P04_TITLE returns the title for problem 4.
• P04_VERTICES returns the integration triangle for problem 4

Moreover, since the same interface is used for each function, if you wish to work with problem 16 instead, you simply change the "04" to "07" in your routine calls.

If you wish to call all of the functions, then you simply use the generic interface, which again has four routines, but which requires you to specify the problem number as an extra input argument:

• P00_FUN evaluates the integrand for problem PROB.
• P00_SINGULARITY warns if the integran for problem PROB has vertex, edge or interior singularities that might cause problems for some integration schemes.
• P00_TITLE returns the title for problem PROB.
• P00_VERTICES returns the integration triangle for problem PROB.

Related Data and Programs:

CUBPACK is a library of FORTRAN90 routines, using double precision arithmetic, which estimates the integral of a function (or vector of functions) over a collection of N-dimensional hyperrectangles and simplices.

DUNAVANT is a FORTRAN90 library of routines for defining Dunavant rules for quadrature on a triangle.

FEKETE is a FORTRAN90 library of routines for defining a Fekete rule for quadrature or interpolation over a triangle.

GM_RULES is a FORTRAN90 library of routines for defining a Grundmann-Moeller rule for quadrature over a triangle, tetrahedron, or general M-dimensional simplex.

INTLIB is a FORTRAN90 library of routines for numerically estimating integrals in one dimension.

NCC_TRIANGLE is a FORTRAN90 library defining Newton-Cotes closed quadrature rules on a triangle.

NCO_TRIANGLE is a FORTRAN90 library defining Newton-Cotes open quadrature rules on a triangle.

NINT_EXACTBESS_TRI is an executable FORTRAN90 program which investigates the polynomial exactness of a quadrature rule for the triangle.

NINTLIB is a FORTRAN90 library of routines for numerically estimating integrals in multiple dimensions.

QUADPACK is a FORTRAN90 library of routines for estimating integrals in one dimension.

QUADRULE is a FORTRAN90 library of routines for defining quadrature rules on a variety of intervals with different weight functions.

SIMPACK is a FORTRAN77 library of routines which approximate the integral of a function or vector of functions over a multidimensional simplex, or a region which is the sum of multidimensional simplexes.

STRI_QUAD is a FORTRAN90 library of routines which can approximate the integral of a function over the surface of a sphere.

STROUD is a FORTRAN90 library of routines which includes some quadrature rules for triangles.

TEST_NINT is a FORTRAN90 library of functions that can be used to test N-dimensional quadrature routines.

TEST_TRI_INT is also available in a C++ version and a MATLAB version.

TOMS612 is a FORTRAN77 library of routines which can estimate the integral of a function over a triangle.

TOMS706 is a FORTRAN77 library which estimates the integral of a function over a triangulated region.

TRIANGULATION is a FORTRAN90 library of routines for triangulations, which includes some quadrature rules on triangles.

WANDZURA is a FORTRAN90 library of routines for defining Wandzura rules for quadrature on a triangle.

Reference:

1. Elise deDoncker, Ian Robinson,
   An Algorithm for Automatic Integration Over a Triangle Using Nonlinear Extrapolation,
   ACM Transactions on Mathematical Software,
   Volume 10, Number 1, March 1984, pages 1-16.
2. Elise deDoncker, Ian Robinson,
   Algorithm 612: Integration over a Triangle Using Nonlinear Extrapolation,
   ACM Transactions on Mathematical Software,
   Volume 10, Number 1, March 1984, pages 17-22.
3. Stephen Wandzura, Hong Xiao,
   Symmetric Quadrature Rules on a Triangle,
   Computers and Mathematics with Applications,
   Volume 45, pages 1829-1840, 2003.

Source Code:

• test_tet_int.f90, the source code.
• test_tet_int.csh, commands to compile the source code.

Examples and Tests:

• test_tet_int_prb.f90, a sample calling program.
• test_tet_int_prb.csh, commands to compile and run the sample program.
• test_tet_int_prb.out, the output from a run of the sample program.

List of Routines:

• GET_PROB_NUM returns the number of test integration problems.
• P00_FUN evaluates the integrand for any problem.
• P00_MONTE_CARLO applies the Monte Carlo rule to integrate a function.
• P00_SINGULARITY warns of common singularities for any problem.
• P00_TITLE returns the title for any problem.
• P00_VERTEX_SUB approximates an integral in a triangle by subdivision.
• P00_VERTICES returns the vertices for any problem.
• P00_WANDZURA05_SUB uses subdivision and a Wandzura rule.
• P01_FUN evaluates the integrand for problem 1.
• P01_TITLE returns the title of problem 1.
• P01_VERTICES returns the vertices for problem 1.
• P02_FUN evaluates the integrand for problem 2.
• P02_TITLE returns the title of problem 2.
• P02_VERTICES returns the vertices for problem 2.
• R8_UNIFORM_01 returns a unit pseudorandom R8.
• SUBTRIANGLE_NEXT computes the next subtriangle of a triangle.
• TIMESTAMP prints the current YMDHMS date as a time stamp.
• TRIANGLE_AREA computes the area of a triangle in 2D.
• TRIANGLE_SAMPLE returns random points in a triangle.

You can go up one level to the FORTRAN90 source codes.