Applies Householder reflectors to matrices on either their rows or columns.
call slaref(type, a, lda, wantz, z, ldz, block, irow1, icol1, istart, istop, itmp1, itmp2, liloz, lihiz, vecs, v2, v3, t1, t2, t3)
call dlaref(type, a, lda, wantz, z, ldz, block, irow1, icol1, istart, istop, itmp1, itmp2, liloz, lihiz, vecs, v2, v3, t1, t2, t3)
The ?laref routine applies one or several Householder reflectors of size 3 to one or two matrices (if column is specified) on either their rows or columns.
(global) CHRACTER*1.
If type = 'R', apply reflectors to the rows of the matrix (apply from left). Otherwise, apply reflectors to the columns of the matrix. Unchanged on exit.
(global) REAL for slaref
DOUBLE PRECISION for dlaref
Array, DIMENSION (lda, *).
On entry, the matrix to receive the reflections.
(local) INTEGER.
On entry, the leading dimension of A; unchanged on exit.
(global) LOGICAL.
If wantz = .TRUE., apply any column reflections to Z as well.
If wantz = .FALSE., do no additional work on Z.
(global) REAL for slaref
DOUBLE PRECISION for dlaref
Array, DIMENSION (ldz, *).
On entry, the second matrix to receive column reflections.
(local) INTEGER.
On entry, the leading dimension of Z; unchanged on exit.
(global). LOGICAL.
= .TRUE. : apply several reflectors at once and read their data from the vecs array;
= .FALSE. : apply the single reflector given by v2, v3, t1, t2, and t3.
(local) INTEGER.
On entry, the local row element of the matrix A.
(local) INTEGER.
On entry, the local column element of the matrix A.
(global) INTEGER.
Specifies the "number" of the first reflector.
istart is used as an index into vecs if block is set. istart is ignored if block is .FALSE. .
(global) INTEGER.
Specifies the "number" of the last reflector.
istop is used as an index into vecs if block is set. istop is ignored if block is .FALSE. .
(local) INTEGER.
Starting range into A. For rows, this is the local first column. For columns, this is the local first row.
(local) INTEGER.
Ending range into A. For rows, this is the local last column. For columns, this is the local last row.
(local). INTEGER.
Serve the same purpose as itmp1, itmp2 but for Z when wantz is set.
(global)
REAL for slaref
DOUBLE PRECISION for dlaref.
Array of size 3 *n (matrix size). This array holds the size 3 reflectors one after another and is only accessed when block is .TRUE.
(global). INTEGER.
REAL for slaref
DOUBLE PRECISION for dlaref.
These parameters hold information on a single size 3 Householder reflector and are read when block is .FALSE., and overwritten when block is .TRUE..
On exit, the updated matrix.
Changed only if wantz is set. If wantz is .FALSE. , z is not referenced.
Undefined.
Undefined.
These parameters are read when block is .FALSE., and overwritten when block is .TRUE..