PDF version (NAG web site
, 64-bit version, 64-bit version)
NAG Toolbox: nag_lapack_zgetrs (f07as)
Purpose
nag_lapack_zgetrs (f07as) solves a complex system of linear equations with multiple right-hand sides,
where
has been factorized by
nag_lapack_zgetrf (f07ar).
Syntax
Description
nag_lapack_zgetrs (f07as) is used to solve a complex system of linear equations
,
or
, the function must be preceded by a call to
nag_lapack_zgetrf (f07ar) which computes the
factorization of
as
. The solution is computed by forward and backward substitution.
If , the solution is computed by solving and then .
If , the solution is computed by solving and then .
If , the solution is computed by solving and then .
References
Golub G H and Van Loan C F (1996) Matrix Computations (3rd Edition) Johns Hopkins University Press, Baltimore
Parameters
Compulsory Input Parameters
- 1:
– string (length ≥ 1)
-
Indicates the form of the equations.
- is solved for .
- is solved for .
- is solved for .
Constraint:
, or .
- 2:
– complex array
-
The first dimension of the array
a must be at least
.
The second dimension of the array
a must be at least
.
The
factorization of
, as returned by
nag_lapack_zgetrf (f07ar).
- 3:
– int64int32nag_int array
-
The dimension of the array
ipiv
must be at least
The pivot indices, as returned by
nag_lapack_zgetrf (f07ar).
- 4:
– complex array
-
The first dimension of the array
b must be at least
.
The second dimension of the array
b must be at least
.
The by right-hand side matrix .
Optional Input Parameters
- 1:
– int64int32nag_int scalar
-
Default:
the first dimension of the arrays
a,
b and the second dimension of the arrays
a,
ipiv.
, the order of the matrix .
Constraint:
.
- 2:
– int64int32nag_int scalar
-
Default:
the second dimension of the array
b.
, the number of right-hand sides.
Constraint:
.
Output Parameters
- 1:
– complex array
-
The first dimension of the array
b will be
.
The second dimension of the array
b will be
.
The by solution matrix .
- 2:
– int64int32nag_int scalar
unless the function detects an error (see
Error Indicators and Warnings).
Error Indicators and Warnings
-
If , argument had an illegal value. An explanatory message is output, and execution of the program is terminated.
Accuracy
For each right-hand side vector
, the computed solution
is the exact solution of a perturbed system of equations
, where
is a modest linear function of
, and
is the
machine precision.
If
is the true solution, then the computed solution
satisfies a forward error bound of the form
where
.
Note that can be much smaller than , and (which is the same as ) can be much larger (or smaller) than .
Forward and backward error bounds can be computed by calling
nag_lapack_zgerfs (f07av), and an estimate for
can be obtained by calling
nag_lapack_zgecon (f07au) with
.
Further Comments
The total number of real floating-point operations is approximately .
This function may be followed by a call to
nag_lapack_zgerfs (f07av) to refine the solution and return an error estimate.
The real analogue of this function is
nag_lapack_dgetrs (f07ae).
Example
This example solves the system of equations
, where
and
Here
is nonsymmetric and must first be factorized by
nag_lapack_zgetrf (f07ar).
Open in the MATLAB editor:
f07as_example
function f07as_example
fprintf('f07as example results\n\n');
trans = 'N';
a = [-1.34 + 2.55i, 0.28 + 3.17i, -6.39 - 2.20i, 0.72 - 0.92i;
-0.17 - 1.41i, 3.31 - 0.15i, -0.15 + 1.34i, 1.29 + 1.38i;
-3.29 - 2.39i, -1.91 + 4.42i, -0.14 - 1.35i, 1.72 + 1.35i;
2.41 + 0.39i, -0.56 + 1.47i, -0.83 - 0.69i, -1.96 + 0.67i];
b = [26.26 + 51.78i, 31.32 - 6.70i;
6.43 - 8.68i, 15.86 - 1.42i;
-5.75 + 25.31i, -2.15 + 30.19i;
1.16 + 2.57i, -2.56 + 7.55i];
[a, ipiv, info] = f07ar(a);
[x, info] = f07as(trans, a, ipiv, b);
disp('Solution(s)');
fprintf('%11d ', [1:size(b,2)]);
fprintf('\n');
disp(x);
f07as example results
Solution(s)
1 2
1.0000 + 1.0000i -1.0000 - 2.0000i
2.0000 - 3.0000i 5.0000 + 1.0000i
-4.0000 - 5.0000i -3.0000 + 4.0000i
0.0000 + 6.0000i 2.0000 - 3.0000i
PDF version (NAG web site
, 64-bit version, 64-bit version)
© The Numerical Algorithms Group Ltd, Oxford, UK. 2009–2015