-- LAPACK driver routine (version 3.7.0) -- -- LAPACK is a software package provided by Univ. of Tennessee, -- -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- December 2016
.. Scalar Arguments .. .. .. Local Scalars .. .. .. External Subroutines .. .. .. Intrinsic Functions .. .. .. Executable Statements ..
Test the input parameters.
Quick return if possible
Get machine constants.
Scale matrix to allowable range, if necessary.
Call DSYTRD to reduce symmetric matrix to tridiagonal form.
For eigenvalues only, call DSTERF. For eigenvectors, first call DORGTR to generate the orthogonal matrix, then call DSTEQR.
If matrix was scaled, then rescale eigenvalues appropriately.
Set WORK(1) to optimal workspace size.
End of DSYEV
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer | :: | JOBZ | ||||
character(len=1) | :: | UPLO | ||||
integer | :: | N |
.. .. Array Arguments .. |
|||
double precision | :: | A(LDA,*) |
.. ===================================================================== .. Parameters .. |
|||
integer | :: | LDA |
.. .. Array Arguments .. |
|||
double precision | :: | W(*) |
.. ===================================================================== .. Parameters .. |
|||
double precision | :: | WORK(*) |
.. ===================================================================== .. Parameters .. |
|||
integer | :: | LWORK |
.. .. Array Arguments .. |
|||
integer | :: | INFO |
.. .. Array Arguments .. |