naginterfaces.library.blas.zrotgc

naginterfaces.library.blas.zrotgc(a, b)

zrotgc generates a complex Givens plane rotation having real cosine.

For full information please refer to the NAG Library document for f06ca

https://support.nag.com/numeric/nl/nagdoc_30.2/flhtml/f06/f06caf.html

Parameters

acomplex

The value $a$, the first element of the vector which determines the rotation.

bcomplex

The value $b$, the second element of the vector which determines the rotation.

Returns

acomplex

The value $d$.

bcomplex

The value $t$, the tangent of the rotation.

cfloat

The value $c$, the cosine of the rotation.

scomplex

The value $s$, the sine of the rotation.

Notes

No equivalent traditional C interface for this routine exists in the NAG Library.

zrotgc generates a complex Givens plane rotation with parameters $c$ (real $\ge 0$) and $s$ (complex), such that, given complex $a$ and $b$:

$$\begin{array}{c}\left(\begin{array}{cc}c& \overline{s}\\ -s& c\end{array}\right)\left(\begin{array}{c}a\\ b\end{array}\right)=\left(\begin{array}{c}d\\ 0\end{array}\right)\text{.}\end{array}$$

If $a$ is real, then $d$ is also real. On exit, $b$ is overwritten by $t$, the tangent of the rotation; $c$ and $s$ can be reconstructed from the single stored value $t$, by a subsequent call to zcsg().

If $\left|b\right|<ϵ\left|a\right|$, where $ϵ$ is the machine precision, the function sets $c=1$ and $s=t$.

Note that $t$ is always set to $b/a$, unless overflow would occur, in which case the function returns the value of the complex expression

$$(\text{flmax}\times sign\left(Re\left(b\right)/a\right),\text{flmax}\times sign\left(Im\left(b\right)/a\right))\text{;}$$

$\text{flmax}$ is the float value given by $1/\left(\text{machine.real\_safe}\right)$.