rpl/lapack/lapack/dlaed3.f - diff

Return to dlaed3.f CVS log

Up to [local] / rpl / lapack / lapack

version 1.18, 2018/05/29 07:17:55	version 1.19, 2023/08/07 08:38:53
Line 1	Line 1
*> \brief \b DLAED3 used by sstedc. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is tridiagonal.	*> \brief \b DLAED3 used by DSTEDC. Finds the roots of the secular equation and updates the eigenvectors. Used when the original matrix is tridiagonal.
*	*
* =========== DOCUMENTATION ===========	* =========== DOCUMENTATION ===========
*	*
Line 170	Line 170
*> \author Univ. of Colorado Denver	*> \author Univ. of Colorado Denver
*> \author NAG Ltd.	*> \author NAG Ltd.
*	*
*> \date June 2017
*
*> \ingroup auxOTHERcomputational	*> \ingroup auxOTHERcomputational
*	*
*> \par Contributors:	*> \par Contributors:
Line 185	Line 183
SUBROUTINE DLAED3( K, N, N1, D, Q, LDQ, RHO, DLAMDA, Q2, INDX,	SUBROUTINE DLAED3( K, N, N1, D, Q, LDQ, RHO, DLAMDA, Q2, INDX,
$ CTOT, W, S, INFO )	$ CTOT, W, S, INFO )
*	*
* -- LAPACK computational routine (version 3.7.1) --	* -- LAPACK computational 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..--
* June 2017
*	*
* .. Scalar Arguments ..	* .. Scalar Arguments ..
INTEGER INFO, K, LDQ, N, N1	INTEGER INFO, K, LDQ, N, N1