PDF version (NAG web site
, 64-bit version, 64-bit version)
NAG Toolbox: nag_lapack_zunmrz (f08bx)
Purpose
nag_lapack_zunmrz (f08bx) multiplies a general complex
by
matrix
by the complex unitary matrix
from an
factorization computed by
nag_lapack_ztzrzf (f08bv).
Syntax
[
c,
info] = f08bx(
side,
trans,
l,
a,
tau,
c, 'm',
m, 'n',
n, 'k',
k)
[
c,
info] = nag_lapack_zunmrz(
side,
trans,
l,
a,
tau,
c, 'm',
m, 'n',
n, 'k',
k)
Description
nag_lapack_zunmrz (f08bx) is intended to be used following a call to
nag_lapack_ztzrzf (f08bv), which performs an
factorization of a real upper trapezoidal matrix
and represents the unitary matrix
as a product of elementary reflectors.
This function may be used to form one of the matrix products
overwriting the result on
, which may be any complex rectangular
by
matrix.
References
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
Parameters
Compulsory Input Parameters
- 1:
– string (length ≥ 1)
-
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:
– string (length ≥ 1)
-
Indicates whether
or
is to be applied to
.
- is applied to .
- is applied to .
Constraint:
or .
- 3:
– int64int32nag_int scalar
-
, the number of columns of the matrix containing the meaningful part of the Householder reflectors.
Constraints:
- if , ;
- if , .
- 4:
– complex array
-
The first dimension of the array
a must be at least
.
The second dimension of the array
a must be at least
if
and at least
if
.
The
th row of
a must contain the vector which defines the elementary reflector
, for
, as returned by
nag_lapack_ztzrzf (f08bv).
- 5:
– complex array
-
The dimension of the array
tau
must be at least
must contain the scalar factor of the elementary reflector
, as returned by
nag_lapack_ztzrzf (f08bv).
- 6:
– complex array
-
The first dimension of the array
c must be at least
.
The second dimension of the array
c must be at least
.
The by matrix .
Optional Input Parameters
- 1:
– int64int32nag_int scalar
-
Default:
the first dimension of the array
c.
, the number of rows of the matrix .
Constraint:
.
- 2:
– int64int32nag_int scalar
-
Default:
the second dimension of the array
c.
, the number of columns of the matrix .
Constraint:
.
- 3:
– int64int32nag_int scalar
-
Default:
the first dimension of the array
a and the dimension of the array
tau.
, the number of elementary reflectors whose product defines the matrix .
Constraints:
- if , ;
- if , .
Output Parameters
- 1:
– complex array
-
The first dimension of the array
c will be
.
The second dimension of the array
c will be
.
c stores
or
or
or
as specified by
side and
trans.
- 2:
– int64int32nag_int scalar
unless the function detects an error (see
Error Indicators and Warnings).
Error Indicators and Warnings
-
If , parameter had an illegal value on entry. The parameters are numbered as follows:
1:
side, 2:
trans, 3:
m, 4:
n, 5:
k, 6:
l, 7:
a, 8:
lda, 9:
tau, 10:
c, 11:
ldc, 12:
work, 13:
lwork, 14:
info.
It is possible that
info refers to a parameter that is omitted from the MATLAB interface. This usually indicates that an error in one of the other input parameters has caused an incorrect value to be inferred.
Accuracy
The computed result differs from the exact result by a matrix
such that
where
is the
machine precision.
Further Comments
The total number of floating-point operations is approximately if and if .
The real analogue of this function is
nag_lapack_dormrz (f08bk).
Example
See
Example in
nag_lapack_ztzrzf (f08bv).
Open in the MATLAB editor:
f08bx_example
function f08bx_example
fprintf('f08bx example results\n\n');
m = int64(3);
n = int64(4);
l = int64(n-m);
a = [ 2.5 - 0.0i, 0.4 - 0.6i, -0.3 - 1.0i, 0.0 - 0.2i;
0.0 + 0.0i, -1.9 - 0.0i, 0.6 + 0.2i, -0.0 + 0.1i;
0.0 + 0.0i, 0.0 + 0.0i, -1.2 - 0.0i, -0.2 - 0.2i];
[rz, tau, info] = f08bv(a);
c = [ -0.71 - 0.01i, 0.26 - 0.43i;
-4.26 - 2.46i, -0.31 - 1.49i;
-2.07 - 6.22i, 1.74 + 2.30i;
0.00 + 0.00i, 0.00 + 0.00i];
side = 'Left';
trans = 'Conjugate transpose';
[zhc, info] = f08bx( ...
side, trans, l, rz, tau, c);
disp(' Z^H * C:');
disp(zhc);
f08bx example results
Z^H * C:
0.7089 + 0.0100i -0.2596 + 0.4293i
4.2581 + 2.4592i 0.3088 + 1.4893i
1.9911 + 6.0296i -1.6985 - 2.2517i
1.4894 + 0.6754i -0.6015 - 0.0664i
PDF version (NAG web site
, 64-bit version, 64-bit version)
© The Numerical Algorithms Group Ltd, Oxford, UK. 2009–2015