rpl/lapack/lapack/dspevd.f - diff

Return to dspevd.f CVS log

Up to [local] / rpl / lapack / lapack

version 1.15, 2017/06/17 11:06:32	version 1.18, 2023/08/07 08:39:06
Line 112	Line 112
*>	*>
*> \param[out] WORK	*> \param[out] WORK
*> \verbatim	*> \verbatim
*> WORK is DOUBLE PRECISION array,	*> WORK is DOUBLE PRECISION array, dimension (MAX(1,LWORK))
*> dimension (LWORK)
*> On exit, if INFO = 0, WORK(1) returns the required LWORK.	*> On exit, if INFO = 0, WORK(1) returns the required LWORK.
*> \endverbatim	*> \endverbatim
*>	*>
Line 171	Line 170
*> \author Univ. of Colorado Denver	*> \author Univ. of Colorado Denver
*> \author NAG Ltd.	*> \author NAG Ltd.
*	*
*> \date December 2016
*
*> \ingroup doubleOTHEReigen	*> \ingroup doubleOTHEReigen
*	*
* =====================================================================	* =====================================================================
SUBROUTINE DSPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK,	SUBROUTINE DSPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK,
$ IWORK, LIWORK, INFO )	$ IWORK, LIWORK, INFO )
*	*
* -- LAPACK driver routine (version 3.7.0) --	* -- LAPACK driver routine --
* -- LAPACK is a software package provided by Univ. of Tennessee, --	* -- LAPACK is a software package provided by Univ. of Tennessee, --
* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--	* -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--
* December 2016
*	*
* .. Scalar Arguments ..	* .. Scalar Arguments ..
CHARACTER JOBZ, UPLO	CHARACTER JOBZ, UPLO