PDP-10 Archive: decus/20-0026/dql4.doc from decus_20tap2

Trailing-Edge - PDP-10 Archives - decus_20tap2_198111 - decus/20-0026/dql4.doc

There are 2 other files named dql4.doc in the archive. Click here to see a list.

SUBROUTINE DQL4

PURPOSE
   TO COMPUTE INTEGRAL(EXP(-X)*FCT(X), SUMMED OVER X
		       FROM 0 TO INFINITY).

USAGE
   CALL DQL4 (FCT,Y)
   PARAMETER FCT REQUIRES AN EXTERNAL STATEMENT

DESCRIPTION OF PARAMETERS
   FCT	  - THE NAME OF AN EXTERNAL DOUBLE PRECISION FUNCTION
	    SUBPROGRAM USED.
   Y	  - THE RESULTING DOUBLE PRECISION INTEGRAL VALUE.

REMARKS
   NONE

SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
   THE EXTERNAL DOUBLE PRECISION FUNCTION SUBPROGRAM FCT(X)
   MUST BE FURNISHED BY THE USER.

METHOD
   EVALUATION IS DONE BY MEANS OF 4-POINT GAUSSIAN-LAGUERRE
   QUADRATURE FORMULA, WHICH INTEGRATES EXACTLY,
   WHENEVER FCT(X) IS A POLYNOMIAL UP TO DEGREE 7.
   FOR REFERENCE, SEE
   SHAO/CHEN/FRANK, TABLES OF ZEROS AND GAUSSIAN WEIGHTS OF
   CERTAIN ASSOCIATED LAGUERRE POLYNOMIALS AND THE RELATED
   GENERALIZED HERMITE POLYNOMIALS, IBM TECHNICAL REPORT
   TR00.1100 (MARCH 1964), PP.24-25.