F08BXF (ZUNMRZ) multiplies a general complex
by
matrix
by the complex unitary matrix
from an
factorization computed by
F08BVF (ZTZRZF).
SUBROUTINE F08BXF ( |
SIDE, TRANS, M, N, K, L, A, LDA, TAU, C, LDC, WORK, LWORK, INFO) |
INTEGER |
M, N, K, L, LDA, LDC, LWORK, INFO |
COMPLEX (KIND=nag_wp) |
A(LDA,*), TAU(*), C(LDC,*), WORK(max(1,LWORK)) |
CHARACTER(1) |
SIDE, TRANS |
|
F08BXF (ZUNMRZ) is intended to be used following a call to
F08BVF (ZTZRZF), which performs an
factorization of a real upper trapezoidal matrix
and represents the unitary matrix
as a product of elementary reflectors.
This routine may be used to form one of the matrix products
overwriting the result on
, which may be any complex rectangular
by
matrix.
Anderson E, Bai Z, Bischof C, Blackford S, Demmel J, Dongarra J J, Du Croz J J, Greenbaum A, Hammarling S, McKenney A and Sorensen D (1999)
LAPACK Users' Guide (3rd Edition) SIAM, Philadelphia
http://www.netlib.org/lapack/lug- 1: SIDE – CHARACTER(1)Input
On entry: indicates how
or
is to be applied to
.
- or is applied to from the left.
- or is applied to from the right.
Constraint:
or .
- 2: TRANS – CHARACTER(1)Input
On entry: indicates whether
or
is to be applied to
.
- is applied to .
- is applied to .
Constraint:
or .
- 3: M – INTEGERInput
On entry: , the number of rows of the matrix .
Constraint:
.
- 4: N – INTEGERInput
On entry: , the number of columns of the matrix .
Constraint:
.
- 5: K – INTEGERInput
On entry: , the number of elementary reflectors whose product defines the matrix .
Constraints:
- if , ;
- if , .
- 6: L – INTEGERInput
On entry: , the number of columns of the matrix containing the meaningful part of the Householder reflectors.
Constraints:
- if , ;
- if , .
- 7: A(LDA,) – COMPLEX (KIND=nag_wp) arrayInput
-
Note: the second dimension of the array
A
must be at least
if
and at least
if
.
On entry: the
th row of
A must contain the vector which defines the elementary reflector
, for
, as returned by
F08BVF (ZTZRZF).
- 8: LDA – INTEGERInput
On entry: the first dimension of the array
A as declared in the (sub)program from which F08BXF (ZUNMRZ) is called.
Constraint:
.
- 9: TAU() – COMPLEX (KIND=nag_wp) arrayInput
-
Note: the dimension of the array
TAU
must be at least
.
On entry:
must contain the scalar factor of the elementary reflector
, as returned by
F08BVF (ZTZRZF).
- 10: C(LDC,) – COMPLEX (KIND=nag_wp) arrayInput/Output
-
Note: the second dimension of the array
C
must be at least
.
On entry: the by matrix .
On exit:
C is overwritten by
or
or
or
as specified by
SIDE and
TRANS.
- 11: LDC – INTEGERInput
On entry: the first dimension of the array
C as declared in the (sub)program from which F08BXF (ZUNMRZ) is called.
Constraint:
.
- 12: WORK() – COMPLEX (KIND=nag_wp) arrayWorkspace
On exit: if
, the real part of
contains the minimum value of
LWORK required for optimal performance.
- 13: LWORK – INTEGERInput
On entry: the dimension of the array
WORK as declared in the (sub)program from which F08BXF (ZUNMRZ) is called.
If
, a workspace query is assumed; the routine only calculates the optimal size of the
WORK array, returns this value as the first entry of the
WORK array, and no error message related to
LWORK is issued.
Suggested value:
for optimal performance, if and at least if , where is the optimal block size.
Constraints:
- if , or ;
- if , or .
- 14: INFO – INTEGEROutput
On exit:
unless the routine detects an error (see
Section 6).
The computed result differs from the exact result by a matrix
such that
where
is the
machine precision.
The real analogue of this routine is
F08BKF (DORMRZ).