public static s19ad( x, out ifail )
|Visual Basic (Declaration)|
Public Shared Function s19ad ( _ x As , _ < > ByRef ifail As _ ) As
public: static s19ad( x, [ ] % ifail )
static member s19ad : x: * ifail: byref ->
On entry: the argument of the function.Constraint: .
On exit: unless the method detects an error (see [Error Indicators and Warnings]).
s19ad evaluates an approximation to the Kelvin function .
Note: for the function is undefined, so we need only consider .
The method is based on several Chebyshev expansions:
where , and are expansions in the variable ;
where is an expansion in the variable ;
where , and and are expansions in the variable .
For , the function is undefined, and hence the method fails and returns zero.
When is sufficiently close to zero, the result is computed as
and when is even closer to zero simply as
For large , is asymptotically given by and this becomes so small that it cannot be computed without underflow and the method fails.
Errors or warnings detected by the method:
On entry, x is too large: the result underflows. On failure, the method returns zero.
Let be the absolute error in the result, and be the relative error in the argument. If is somewhat larger than the machine representation error, then we have:
For small , errors are attenuated by the function and hence are limited by the machine precision.
For medium and large , the error behaviour, like the function itself, is oscillatory and hence only absolute accuracy of the function can be maintained. For this range of , the amplitude of the absolute error decays like , which implies a strong attenuation of error. Eventually, , which is asymptotically given by ,becomes so small that it cannot be calculated without causing underflow and therefore the method returns zero. Note that for large , the errors are dominated by those of the exponential function.
Underflow may occur for a few values of close to the zeros of , below the limit which causes a failure with .
This example reads values of the argument from a file, evaluates the function at each value of and prints the results.