S01EAF (PDF version)
S Chapter Contents
S Chapter Introduction
NAG Library Manual

NAG Library Routine Document

S01EAF

Note:  before using this routine, please read the Users' Note for your implementation to check the interpretation of bold italicised terms and other implementation-dependent details.

+ Contents

    1  Purpose
    7  Accuracy

1  Purpose

S01EAF evaluates the exponential function ez, for complex z.

2  Specification

FUNCTION S01EAF ( Z, IFAIL)
COMPLEX (KIND=nag_wp) S01EAF
INTEGER  IFAIL
COMPLEX (KIND=nag_wp)  Z

3  Description

S01EAF evaluates the exponential function ez, taking care to avoid machine overflow, and giving a warning if the result cannot be computed to more than half precision. The function is evaluated as ez=excosy+isiny, where x and y are the real and imaginary parts respectively of z.
Since cosy and siny are less than or equal to 1 in magnitude, it is possible that ex may overflow although excosy or exsiny does not. In this case the alternative formula signcosyex+lncosy is used for the real part of the result, and signsinyex+lnsiny for the imaginary part. If either part of the result still overflows, a warning is returned through parameter IFAIL.
If Imz is too large, precision may be lost in the evaluation of siny and cosy. Again, a warning is returned through IFAIL.

4  References

None.

5  Parameters

1:     Z – COMPLEX (KIND=nag_wp)Input
On entry: the argument z of the function.
2:     IFAIL – INTEGERInput/Output
On entry: IFAIL must be set to 0, -1​ or ​1. If you are unfamiliar with this parameter you should refer to Section 3.3 in the Essential Introduction for details.
For environments where it might be inappropriate to halt program execution when an error is detected, the value -1​ or ​1 is recommended. If the output of error messages is undesirable, then the value 1 is recommended. Otherwise, if you are not familiar with this parameter, the recommended value is 0. When the value -1​ or ​1 is used it is essential to test the value of IFAIL on exit.
On exit: IFAIL=0 unless the routine detects an error or a warning has been flagged (see Section 6).

6  Error Indicators and Warnings

If on entry IFAIL=0 or -1, explanatory error messages are output on the current error message unit (as defined by X04AAF).
Errors or warnings detected by the routine:
IFAIL=1
The real part of the result overflows, and is set to the largest safe number with the correct sign. The imaginary part of the result is meaningful.
IFAIL=2
The imaginary part of the result overflows, and is set to the largest safe number with the correct sign. The real part of the result is meaningful.
IFAIL=3
Both real and imaginary parts of the result overflow, and are set to the largest safe number with the correct signs.
IFAIL=4
The computed result is accurate to less than half precision, due to the size of Imz.
IFAIL=5
The computed result has no precision, due to the size of Imz, and is set to zero.

7  Accuracy

Accuracy is limited in general only by the accuracy of the standard functions in the computation of siny, cosy and ex, where x=Rez, y=Imz. As y gets larger, precision will probably be lost due to argument reduction in the evaluation of the sine and cosine functions, until the warning error IFAIL=4 occurs when y gets larger than 1/ε, where ε is the machine precision. Note that on some machines, the intrinsic functions SIN and COS will not operate on arguments larger than about 1/ε, and so IFAIL can never return as 4.
In the comparatively rare event that the result is computed by the formulae signcosyex+lncosy and signsinyex+lnsiny, a further small loss of accuracy may be expected due to rounding errors in the logarithmic function.

8  Further Comments

None.

9  Example

This example reads values of the argument z from a file, evaluates the function at each value of z and prints the results.

9.1  Program Text

Program Text (s01eafe.f90)

9.2  Program Data

Program Data (s01eafe.d)

9.3  Program Results

Program Results (s01eafe.r)


S01EAF (PDF version)
S Chapter Contents
S Chapter Introduction
NAG Library Manual

© The Numerical Algorithms Group Ltd, Oxford, UK. 2012