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 2by2 or 3by3 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 2by2 or 3by3 matrix H and specified shifts.
Download SLAQR1 + dependencies [TGZ] [ZIP] [TXT]Given a 2by2 or 3by3 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 2by2 or 3by3 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.