LAPACK
3.4.2
LAPACK: Linear Algebra PACKage
|
Go to the source code of this file.
Functions/Subroutines | |
subroutine | slaqr1 (N, H, LDH, SR1, SI1, SR2, SI2, V) |
SLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts. |
subroutine slaqr1 | ( | integer | N, |
real, dimension( ldh, * ) | H, | ||
integer | LDH, | ||
real | SR1, | ||
real | SI1, | ||
real | SR2, | ||
real | SI2, | ||
real, dimension( * ) | V | ||
) |
SLAQR1 sets a scalar multiple of the first column of the product of 2-by-2 or 3-by-3 matrix H and specified shifts.
Download SLAQR1 + dependencies [TGZ] [ZIP] [TXT]Given a 2-by-2 or 3-by-3 matrix H, SLAQR1 sets v to a scalar multiple of the first column of the product (*) K = (H - (sr1 + i*si1)*I)*(H - (sr2 + i*si2)*I) scaling to avoid overflows and most underflows. It is assumed that either 1) sr1 = sr2 and si1 = -si2 or 2) si1 = si2 = 0. This is useful for starting double implicit shift bulges in the QR algorithm.
[in] | N | N is integer Order of the matrix H. N must be either 2 or 3. |
[in] | H | H is REAL array of dimension (LDH,N) The 2-by-2 or 3-by-3 matrix H in (*). |
[in] | LDH | LDH is integer The leading dimension of H as declared in the calling procedure. LDH.GE.N |
[in] | SR1 | SR1 is REAL |
[in] | SI1 | SI1 is REAL |
[in] | SR2 | SR2 is REAL |
[in] | SI2 | SI2 is REAL The shifts in (*). |
[out] | V | V is REAL array of dimension N A scalar multiple of the first column of the matrix K in (*). |
Definition at line 122 of file slaqr1.f.