rpl/lapack/lapack/zlasyf_rk.f - diff

Return to zlasyf_rk.f CVS log

Up to [local] / rpl / lapack / lapack

version 1.3, 2018/05/29 07:18:30	version 1.4, 2020/05/21 21:46:09
Line 330	Line 330
* of A and working backwards, and compute the matrix W = U12*D	* of A and working backwards, and compute the matrix W = U12*D
* for use in updating A11	* for use in updating A11
*	*
* Initilize the first entry of array E, where superdiagonal	* Initialize the first entry of array E, where superdiagonal
* elements of D are stored	* elements of D are stored
*	*
E( 1 ) = CZERO	E( 1 ) = CZERO
Line 658	Line 658
* of A and working forwards, and compute the matrix W = L21*D	* of A and working forwards, and compute the matrix W = L21*D
* for use in updating A22	* for use in updating A22
*	*
* Initilize the unused last entry of the subdiagonal array E.	* Initialize the unused last entry of the subdiagonal array E.
*	*
E( N ) = CZERO	E( N ) = CZERO
*	*