F06CAF (PDF version)
F06 Chapter Contents
F06 Chapter Introduction
NAG Library Manual

# NAG Library Routine DocumentF06CAF

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.

## 1  Purpose

F06CAF generates a complex Givens plane rotation having real cosine.

## 2  Specification

 SUBROUTINE F06CAF ( A, B, C, S)
 REAL (KIND=nag_wp) C COMPLEX (KIND=nag_wp) A, B, S

## 3  Description

F06CAF generates a complex Givens plane rotation with parameters $c$ (real $\text{}\ge 0$) and $s$ (complex), such that, given complex $a$ and $b$:
 $c s- -s c a b = d 0 .$
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 F06CCF.
If $\left|b\right|<\epsilon \left|a\right|$, where $\epsilon$ is the machine precision, the routine sets $c=1$ and $s=t$.
Note that $t$ is always set to $b/a$, unless overflow would occur, in which case the routine returns the value of the expression
 $CMPLX flmax × sign Reb /a , flmax × signImb / a ;$
$\mathit{flmax}$ is the real value given by $1/\left({\mathbf{X02AMF}}\right)$.

None.

## 5  Parameters

1:     A – COMPLEX (KIND=nag_wp)Input/Output
On entry: the value $a$, the first element of the vector which determines the rotation.
On exit: the value $d$.
2:     B – COMPLEX (KIND=nag_wp)Input/Output
On entry: the value $b$, the second element of the vector which determines the rotation.
On exit: the value $t$, the tangent of the rotation.
3:     C – REAL (KIND=nag_wp)Output
On exit: the value $c$, the cosine of the rotation.
4:     S – COMPLEX (KIND=nag_wp)Output
On exit: the value $s$, the sine of the rotation.

None.

Not applicable.

None.

## 9  Example

None.

F06CAF (PDF version)
F06 Chapter Contents
F06 Chapter Introduction
NAG Library Manual
{"extraction_info": {"found_math": true, "script_math_tex": 0, "script_math_asciimath": 0, "math_annotations": 0, "math_alttext": 0, "mathml": 28, "mathjax_tag": 0, "mathjax_inline_tex": 0, "mathjax_display_tex": 0, "mathjax_asciimath": 0, "img_math": 0, "codecogs_latex": 0, "wp_latex": 0, "mimetex.cgi": 0, "/images/math/codecogs": 0, "mathtex.cgi": 0, "katex": 0, "math-container": 0, "wp-katex-eq": 0, "align": 0, "equation": 0, "x-ck12": 0, "texerror": 0, "math_score": 0.9977998733520508, "perplexity": 3307.2634812145284}, "config": {"markdown_headings": true, "markdown_code": false, "boilerplate_config": {"ratio_threshold": 0.18, "absolute_threshold": 10, "end_threshold": 15, "enable": false}, "remove_buttons": true, "remove_image_figures": true, "remove_link_clusters": true, "table_config": {"min_rows": 2, "min_cols": 3, "format": "plain"}, "remove_chinese": true, "remove_edit_buttons": true, "extract_latex": true}, "warc_path": "s3://commoncrawl/crawl-data/CC-MAIN-2015-22/segments/1432207928715.47/warc/CC-MAIN-20150521113208-00238-ip-10-180-206-219.ec2.internal.warc.gz"}