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

NAG Library Routine Document

F06TWF

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
    10  Example

1  Purpose

F06TWF transforms a complex upper triangular matrix to an upper spiked matrix by applying a given sequence of plane rotations.

2  Specification

SUBROUTINE F06TWF ( SIDE, N, K1, K2, C, S, A, LDA)
INTEGER  N, K1, K2, LDA
REAL (KIND=nag_wp)  C(*)
COMPLEX (KIND=nag_wp)  S(*), A(LDA,*)
CHARACTER(1)  SIDE

3  Description

F06TWF transforms an n by n complex upper triangular matrix U with real diagonal elements, to an upper spiked matrix H, by applying a given sequence of plane rotations from either the left or the right, in planes k1 to k2. H has real diagonal elements except where the spike joins the diagonal.
If SIDE='L', H has a row spike, with nonzero elements h k2,k , for k = k1 , k1+1, , k2-1 . The rotations are applied from the left:
H=PU ,  
where P = Pk1 Pk1+1 Pk2-1  and Pk is a rotation in the k,k2 plane.
If SIDE='R', H has a column spike, with nonzero elements h k+1, k1 , for k= k1, k1+1, , k2-1 . The rotations are applied from the right:
HPH = R ,  
where P = Pk2-1 Pk1+1 Pk1  and Pk is a rotation in the k1,k+1 plane.
The 2 by 2 plane rotation part of Pk has the form
ck s-k -sk ck  
with ck real.

4  References

None.

5  Parameters

1:     SIDE – CHARACTER(1)Input
On entry: specifies whether U is operated on from the left or the right.
SIDE='L'
U is pre-multiplied from the left.
SIDE='R'
U is post-multiplied from the right.
Constraint: SIDE='L' or 'R'.
2:     N – INTEGERInput
On entry: n, the order of the matrices U and H.
Constraint: N0.
3:     K1 – INTEGERInput
4:     K2 – INTEGERInput
On entry: the values k1 and k2.
If K1<1 or K2K1 or K2>N, an immediate return is effected.
5:     C* – REAL (KIND=nag_wp) arrayInput
Note: the dimension of the array C must be at least K2-K1.
On entry: Ck must hold ck, the cosine of the rotation Pk, for k=k1,,k2-1.
6:     S* – COMPLEX (KIND=nag_wp) arrayInput/Output
Note: the dimension of the array S must be at least K2-K1.
On entry: Sk must hold sk, the sine of the rotation Pk, for k=k1,,k2-1.
On exit: Sk holds a nonzero element of the spike of H: hk2,k if SIDE='L', or hk+1,k1 if SIDE='R', for k=k1,,k2-1.
7:     ALDA* – COMPLEX (KIND=nag_wp) arrayInput/Output
Note: the second dimension of the array A must be at least N.
On entry: the n by n upper triangular matrix U. The imaginary parts of the diagonal elements must be zero.
On exit: the upper triangular part of the upper spiked matrix H. The imaginary parts of the diagonal elements are set to zero except for the k2,k2  element if SIDE='L', or the k1,k1  element if SIDE='R'.
8:     LDA – INTEGERInput
On entry: the first dimension of the array A as declared in the (sub)program from which F06TWF is called.
Constraint: LDA max1,N .

6  Error Indicators and Warnings

None.

7  Accuracy

Not applicable.

8  Parallelism and Performance

Not applicable.

9  Further Comments

None.

10  Example

None.

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

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