![]() |
LAPACK
3.4.0
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 | |
| subroutine SLAQR1 | ( | INTEGER | N, |
| REAL, dimension( ldh, * ) | H, | ||
| INTEGER | LDH, | ||
| REAL | SR1, | ||
| REAL | SI1, | ||
| REAL | SR2, | ||
| REAL | SI2, | ||
| REAL, dimension( * ) | V | ||
| ) |
SLAQR1
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.