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: – 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: – CHARACTER(1)Input
-
On entry: indicates whether
or
is to be applied to
.
- is applied to .
- is applied to .
Constraint:
or .
- 3: – INTEGERInput
-
On entry: , the number of rows of the matrix .
Constraint:
.
- 4: – INTEGERInput
-
On entry: , the number of columns of the matrix .
Constraint:
.
- 5: – INTEGERInput
-
On entry: , the number of elementary reflectors whose product defines the matrix .
Constraints:
- if , ;
- if , .
- 6: – INTEGERInput
-
On entry: , the number of columns of the matrix containing the meaningful part of the Householder reflectors.
Constraints:
- if , ;
- if , .
- 7: – 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: – INTEGERInput
-
On entry: the first dimension of the array
A as declared in the (sub)program from which F08BXF (ZUNMRZ) is called.
Constraint:
.
- 9: – 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: – 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: – INTEGERInput
-
On entry: the first dimension of the array
C as declared in the (sub)program from which F08BXF (ZUNMRZ) is called.
Constraint:
.
- 12: – COMPLEX (KIND=nag_wp) arrayWorkspace
-
On exit: if
, the real part of
contains the minimum value of
LWORK required for optimal performance.
- 13: – 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: – 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.
F08BXF (ZUNMRZ) is not threaded by NAG in any implementation.
F08BXF (ZUNMRZ) makes calls to BLAS and/or LAPACK routines, which may be threaded within the vendor library used by this implementation. Consult the documentation for the vendor library for further information.
Please consult the
X06 Chapter Introduction for information on how to control and interrogate the OpenMP environment used within this routine. Please also consult the
Users' Note for your implementation for any additional implementation-specific information.
The real analogue of this routine is
F08BKF (DORMRZ).