NAG Library Routine Document

F08GPF (ZHPEVX)

1  Purpose

2  Specification

3  Description

4  References

5  Parameters

1:     JOBZ – CHARACTER(1)Input

On entry: indicates whether eigenvectors are computed.

$\mathbf{JOBZ}=\text{'N'}$

Only eigenvalues are computed.

$\mathbf{JOBZ}=\text{'V'}$

Eigenvalues and eigenvectors are computed.

Constraint: $\mathbf{JOBZ}=\text{'N'}$ or $\text{'V'}$.

2:     RANGE – CHARACTER(1)Input

On entry: if $\mathbf{RANGE}=\text{'A'}$, all eigenvalues will be found.

If $\mathbf{RANGE}=\text{'V'}$, all eigenvalues in the half-open interval $\left(\mathbf{VL},\mathbf{VU}\right]$ will be found.

If $\mathbf{RANGE}=\text{'I'}$, the ILth to IUth eigenvalues will be found.

Constraint: $\mathbf{RANGE}=\text{'A'}$, $\text{'V'}$ or $\text{'I'}$.

3:     UPLO – CHARACTER(1)Input

On entry: if $\mathbf{UPLO}=\text{'U'}$, the upper triangular part of $A$ is stored.

If $\mathbf{UPLO}=\text{'L'}$, the lower triangular part of $A$ is stored.

Constraint: $\mathbf{UPLO}=\text{'U'}$ or $\text{'L'}$.

4:     N – INTEGERInput

On entry: $n$, the order of the matrix $A$.

Constraint: $\mathbf{N}\ge 0$.

5:     AP($*$) – COMPLEX (KIND=nag_wp) arrayInput/Output

Note: the dimension of the array AP must be at least $\max \left(1,\mathbf{N}\times \left(\mathbf{N}+1\right)/2\right)$.

On entry: the upper or lower triangle of the $n$ by $n$ Hermitian matrix $A$, packed by columns.

More precisely,

• if $\mathbf{UPLO}=\text{'U'}$, the upper triangle of $A$ must be stored with element $A_{ij}$ in $\mathbf{AP}\left(i+j\left(j-1\right)/2\right)$ for $i\le j$;
• if $\mathbf{UPLO}=\text{'L'}$, the lower triangle of $A$ must be stored with element $A_{ij}$ in $\mathbf{AP}\left(i+\left(2n-j\right)\left(j-1\right)/2\right)$ for $i\ge j$.

On exit: AP is overwritten by the values generated during the reduction to tridiagonal form. The elements of the diagonal and the off-diagonal of the tridiagonal matrix overwrite the corresponding elements of $A$.

6:     VL – REAL (KIND=nag_wp)Input

7:     VU – REAL (KIND=nag_wp)Input

On entry: if $\mathbf{RANGE}=\text{'V'}$, the lower and upper bounds of the interval to be searched for eigenvalues.

If $\mathbf{RANGE}=\text{'A'}$ or $\text{'I'}$, VL and VU are not referenced.

Constraint: if $\mathbf{RANGE}=\text{'V'}$, $\mathbf{VL}<\mathbf{VU}$.

8:     IL – INTEGERInput

9:     IU – INTEGERInput

On entry: if $\mathbf{RANGE}=\text{'I'}$, the indices (in ascending order) of the smallest and largest eigenvalues to be returned.

If $\mathbf{RANGE}=\text{'A'}$ or $\text{'V'}$, IL and IU are not referenced.

Constraints:

• if $\mathbf{RANGE}=\text{'I'}$ and $\mathbf{N}=0$, $\mathbf{IL}=1$ and $\mathbf{IU}=0$;
• if $\mathbf{RANGE}=\text{'I'}$ and $\mathbf{N}>0$, $1\le \mathbf{IL}\le \mathbf{IU}\le \mathbf{N}$.

10:   ABSTOL – REAL (KIND=nag_wp)Input

On entry: the absolute error tolerance for the eigenvalues. An approximate eigenvalue is accepted as converged when it is determined to lie in an interval $\left[a,b\right]$ of width less than or equal to

$$\mathbf{ABSTOL}+\epsilon \max \left(\left|a\right|,\left|b\right|\right)\text{,}$$

where $\epsilon$ is the machine precision. If ABSTOL is less than or equal to zero, then $\epsilon {‖T‖}_1$ will be used in its place, where $T$ is the tridiagonal matrix obtained by reducing $A$ to tridiagonal form. Eigenvalues will be computed most accurately when ABSTOL is set to twice the underflow threshold $2\times \mathbf{X02AMF}\left( \right)$, not zero. If this routine returns with $\mathbf{INFO}>\mathbf{0}$, indicating that some eigenvectors did not converge, try setting ABSTOL to $2\times \mathbf{X02AMF}\left( \right)$. See Demmel and Kahan (1990).

11:   M – INTEGEROutput

On exit: the total number of eigenvalues found. $0\le \mathbf{M}\le \mathbf{N}$.

If $\mathbf{RANGE}=\text{'A'}$, $\mathbf{M}=\mathbf{N}$.

If $\mathbf{RANGE}=\text{'I'}$, $\mathbf{M}=\mathbf{IU}-\mathbf{IL}+1$.

12:   W(N) – REAL (KIND=nag_wp) arrayOutput

On exit: the selected eigenvalues in ascending order.

13:   Z(LDZ,$*$) – COMPLEX (KIND=nag_wp) arrayOutput

Note: the second dimension of the array Z must be at least $\max \left(1,\mathbf{M}\right)$ if $\mathbf{JOBZ}=\text{'V'}$, and at least $1$ otherwise.

On exit: if $\mathbf{JOBZ}=\text{'V'}$, then

• if $\mathbf{INFO}=\mathbf{0}$, the first M columns of $Z$ contain the orthonormal eigenvectors of the matrix $A$ corresponding to the selected eigenvalues, with the $i$th column of $Z$ holding the eigenvector associated with $\mathbf{W}\left(i\right)$;
• if an eigenvector fails to converge ($\mathbf{INFO}>\mathbf{0}$), then that column of $Z$ contains the latest approximation to the eigenvector, and the index of the eigenvector is returned in JFAIL.

If $\mathbf{JOBZ}=\text{'N'}$, Z is not referenced.

Note:  you must ensure that at least $\max \left(1,\mathbf{M}\right)$ columns are supplied in the array Z; if $\mathbf{RANGE}=\text{'V'}$, the exact value of M is not known in advance and an upper bound of at least N must be used.

14:   LDZ – INTEGERInput

On entry: the first dimension of the array Z as declared in the (sub)program from which F08GPF (ZHPEVX) is called.

Constraints:

• if $\mathbf{JOBZ}=\text{'V'}$, $\mathbf{LDZ}\ge \max \left(1,\mathbf{N}\right)$;
• otherwise $\mathbf{LDZ}\ge 1$.

15:   WORK($2\times \mathbf{N}$) – COMPLEX (KIND=nag_wp) arrayWorkspace

16:   RWORK($7\times \mathbf{N}$) – REAL (KIND=nag_wp) arrayWorkspace

17:   IWORK($5\times \mathbf{N}$) – INTEGER arrayWorkspace

18:   JFAIL($*$) – INTEGER arrayOutput

Note: the dimension of the array JFAIL must be at least $\max \left(1,\mathbf{N}\right)$.

On exit: if $\mathbf{JOBZ}=\text{'V'}$, then

• if $\mathbf{INFO}=\mathbf{0}$, the first M elements of JFAIL are zero;
• if $\mathbf{INFO}>\mathbf{0}$, JFAIL contains the indices of the eigenvectors that failed to converge.

If $\mathbf{JOBZ}=\text{'N'}$, JFAIL is not referenced.

19:   INFO – INTEGEROutput

On exit: $\mathbf{INFO}=0$ unless the routine detects an error (see Section 6).

6  Error Indicators and Warnings

$\mathbf{INFO}<0$

If $\mathbf{INFO}=-i$, argument $i$ had an illegal value. An explanatory message is output, and execution of the program is terminated.

$\mathbf{INFO}>0$

If $\mathbf{INFO}=i$, then $i$ eigenvectors failed to converge. Their indices are stored in array JFAIL. Please see ABSTOL.

7  Accuracy

8  Further Comments

9  Example

9.1  Program Text

Program Text (f08gpfe.f90)

9.2  Program Data

Program Data (f08gpfe.d)

9.3  Program Results

Program Results (f08gpfe.r)