C FUN must be a REAL function of one REAL argument. C ERR - is a requested pseudorelative error tolerance. Usually, smaller values for ERR yield more C accuracy and require more function evaluations. C ERR - will be an estimate of the absolute error in ANS if the C input value of ERR was negative. The estimated C error is solely for information to the user and should C not be used as a correction to the computed integral.
ANS is set to zero.
Prologue converted to Version 4.0 format. C C Compute refined estimates, estimate the error, etc.