Trailing-Edge
-
PDP-10 Archives
-
decuslib20-02
-
decus/20-0026/qa7.doc
There are 2 other files named qa7.doc in the archive. Click here to see a list.
SUBROUTINE QA7
PURPOSE
TO COMPUTE INTEGRAL(EXP(-X)*FCT(X)/SQRT(X), SUMMED OVER X
FROM 0 TO INFINITY).
USAGE
CALL QA7 (FCT,Y)
PARAMETER FCT REQUIRES AN EXTERNAL STATEMENT
DESCRIPTION OF PARAMETERS
FCT - THE NAME OF AN EXTERNAL FUNCTION SUBPROGRAM USED.
Y - THE RESULTING INTEGRAL VALUE.
REMARKS
NONE
SUBROUTINES AND FUNCTION SUBPROGRAMS REQUIRED
THE EXTERNAL FUNCTION SUBPROGRAM FCT(X) MUST BE FURNISHED
BY THE USER.
METHOD
EVALUATION IS DONE BY MEANS OF 7-POINT GENERALIZED GAUSSIAN-
LAGUERRE QUADRATURE FORMULA, WHICH INTEGRATES EXACTLY,
WHENEVER FCT(X) IS A POLYNOMIAL UP TO DEGREE 13.
FOR REFERENCE, SEE
CONCUS/CASSATT/JAEHNIG/MELBY, TABLES FOR THE EVALUATION OF
INTEGRAL(X**BETA*EXP(-X)*F(X), SUMMED OVER X FROM 0 TO
INFINITY) BY GAUSS-LAGUERRE QUADRATURE, MTAC, VOL.17,
ISS.83 (1963), PP.245-256.