NAG Library Routine Document
F08GSF (ZHPTRD)
1 Purpose
F08GSF (ZHPTRD) reduces a complex Hermitian matrix to tridiagonal form, using packed storage.
2 Specification
INTEGER |
N, INFO |
REAL (KIND=nag_wp) |
D(N), E(N-1) |
COMPLEX (KIND=nag_wp) |
AP(*), TAU(N-1) |
CHARACTER(1) |
UPLO |
|
The routine may be called by its
LAPACK
name zhptrd.
3 Description
F08GSF (ZHPTRD) reduces a complex Hermitian matrix , held in packed storage, to real symmetric tridiagonal form by a unitary similarity transformation: .
The matrix
is not formed explicitly but is represented as a product of
elementary reflectors (see the
F08 Chapter Introduction for details). Routines are provided to work with
in this representation (see
Section 8).
4 References
Golub G H and Van Loan C F (1996) Matrix Computations (3rd Edition) Johns Hopkins University Press, Baltimore
5 Parameters
- 1: UPLO – CHARACTER(1)Input
On entry: indicates whether the upper or lower triangular part of
is stored.
- The upper triangular part of is stored.
- The lower triangular part of is stored.
Constraint:
or .
- 2: N – INTEGERInput
On entry: , the order of the matrix .
Constraint:
.
- 3: AP() – COMPLEX (KIND=nag_wp) arrayInput/Output
-
Note: the dimension of the array
AP
must be at least
.
On entry: the upper or lower triangle of the
by
Hermitian matrix
, packed by columns.
More precisely,
- if , the upper triangle of must be stored with element in for ;
- if , the lower triangle of must be stored with element in for .
On exit:
AP is overwritten by the tridiagonal matrix
and details of the unitary matrix
.
- 4: D(N) – REAL (KIND=nag_wp) arrayOutput
On exit: the diagonal elements of the tridiagonal matrix .
- 5: E() – REAL (KIND=nag_wp) arrayOutput
On exit: the off-diagonal elements of the tridiagonal matrix .
- 6: TAU() – COMPLEX (KIND=nag_wp) arrayOutput
On exit: further details of the unitary matrix .
- 7: INFO – INTEGEROutput
On exit:
unless the routine detects an error (see
Section 6).
6 Error Indicators and Warnings
Errors or warnings detected by the routine:
If , argument had an illegal value. An explanatory message is output, and execution of the program is terminated.
7 Accuracy
The computed tridiagonal matrix
is exactly similar to a nearby matrix
, where
is a modestly increasing function of
, and
is the
machine precision.
The elements of themselves may be sensitive to small perturbations in or to rounding errors in the computation, but this does not affect the stability of the eigenvalues and eigenvectors.
The total number of real floating point operations is approximately .
To form the unitary matrix
F08GSF (ZHPTRD) may be followed by a call to
F08GTF (ZUPGTR):
CALL ZUPGTR(UPLO,N,AP,TAU,Q,LDQ,WORK,INFO)
To apply
to an
by
complex matrix
F08GSF (ZHPTRD) may be followed by a call to
F08GUF (ZUPMTR). For example,
CALL ZUPMTR('Left',UPLO,'No Transpose',N,P,AP,TAU,C,LDC,WORK, &
INFO)
forms the matrix product
.
The real analogue of this routine is
F08GEF (DSPTRD).
9 Example
This example reduces the matrix
to tridiagonal form, where
using packed storage.
9.1 Program Text
Program Text (f08gsfe.f90)
9.2 Program Data
Program Data (f08gsfe.d)
9.3 Program Results
Program Results (f08gsfe.r)