rpl/lapack/lapack/dlaln2.f - diff

Return to dlaln2.f CVS log

Up to [local] / rpl / lapack / lapack

version 1.1, 2010/01/26 15:22:46	version 1.8, 2011/07/22 07:38:06
Line 19	Line 19
* =======	* =======
*	*
* DLALN2 solves a system of the form (ca A - w D ) X = s B	* DLALN2 solves a system of the form (ca A - w D ) X = s B
* or (ca A' - w D) X = s B with possible scaling ("s") and	* or (ca A**T - w D) X = s B with possible scaling ("s") and
* perturbation of A. (A' means A-transpose.)	* perturbation of A. (A**T means A-transpose.)
*	*
* A is an NA x NA real matrix, ca is a real scalar, D is an NA x NA	* A is an NA x NA real matrix, ca is a real scalar, D is an NA x NA
* real diagonal matrix, w is a real or complex value, and X and B are	* real diagonal matrix, w is a real or complex value, and X and B are
Line 257	Line 257
*	*
* 2x2 System	* 2x2 System
*	*
* Compute the real part of C = ca A - w D (or ca A' - w D )	* Compute the real part of C = ca A - w D (or ca A**T - w D )
*	*
CR( 1, 1 ) = CAA( 1, 1 ) - WRD1	CR( 1, 1 ) = CAA( 1, 1 ) - WRD1
CR( 2, 2 ) = CAA( 2, 2 ) - WRD2	CR( 2, 2 ) = CAA( 2, 2 ) - WRD2