$diag ='N'$: $A$ is a nonunit triangular matrix.
$diag ='U'$: $A$ is a unit triangular matrix; the diagonal elements are not referenced and are assumed to be $1$ .

Constraint:

diag ='N'

'U'

4: $ap (:)$ – double array

The dimension of the array ap must be at least

\max (1, n \times (n + 1) / 2)

The

n

n

triangular matrix

A

, packed by columns.

More precisely,

if $uplo ='U'$ , the upper triangle of $A$ must be stored with element $A_{i j}$ in $ap (i + j (j - 1) / 2)$ for $i \leq j$ ;
if $uplo ='L'$ , the lower triangle of $A$ must be stored with element $A_{i j}$ in $ap (i + (2 n - j) (j - 1) / 2)$ for $i \geq j$ .

diag ='U'

, the diagonal elements of

A

are assumed to be

1

, and are not referenced; the same storage scheme is used whether

diag ='N'

or ‘U’.

5: $b (ldb :)$ – double array

The first dimension of the array b must be at least

\max (1, n)

The second dimension of the array b must be at least

\max (1, nrhs_p)

The

n

r

right-hand side matrix

B

Optional Input Parameters

1: $n$ – int64int32nag_int scalar: Default: the first dimension of the array ap and the second dimension of the array ap. (An error is raised if these dimensions are not equal.)
$n$ , the order of the matrix $A$ .

Constraint: $n \geq 0$ .
2: $nrhs_p$ – int64int32nag_int scalar: Default: the second dimension of the array b.
$r$ , the number of right-hand sides.

Constraint: $nrhs_p \geq 0$ .

Output Parameters

1: $b (ldb :)$ – double array: The first dimension of the array b will be $\max (1, n)$ .
The second dimension of the array b will be $\max (1, nrhs_p)$ .

The $n$ by $r$ solution matrix $X$ .
2: $info$ – int64int32nag_int scalar: $info = 0$ unless the function detects an error (see Error Indicators and Warnings).

Error Indicators and Warnings

Cases prefixed with W are classified as warnings and do not generate an error of type NAG:error_n. See nag_issue_warnings.

$info < 0$: If $info = - i$ , argument $i$ had an illegal value. An explanatory message is output, and execution of the program is terminated.

W $info > 0$: Element $_$ of the diagonal is exactly zero. $A$ is singular and the solution has not been computed.

Accuracy

The solutions of triangular systems of equations are usually computed to high accuracy. See Higham (1989).

For each right-hand side vector

b

, the computed solution

x

is the exact solution of a perturbed system of equations

(A + E) x = b

, where

|E| \leq c (n) ε |A|,

c (n)

is a modest linear function of

n

, and

ε

is the machine precision.

\hat{x}

is the true solution, then the computed solution

x

satisfies a forward error bound of the form

\frac{{‖x - \hat{x}‖}_{\infty}}{{‖x‖}_{\infty}} \leq c (n) cond (A, x) ε,   provided c (n) cond (A, x) ε < 1,

where

cond (A, x) = {‖|A^{- 1}| |A| |x|‖}_{\infty} / {‖x‖}_{\infty}

Note that

cond (A, x) \leq cond (A) = {‖|A^{- 1}| |A|‖}_{\infty} \leq κ_{\infty} (A)

;

cond (A, x)

can be much smaller than

cond (A)

and it is also possible for

cond (A^{T})

to be much larger (or smaller) than

cond (A)

Forward and backward error bounds can be computed by calling nag_lapack_dtprfs (f07uh), and an estimate for

κ_{\infty} (A)

can be obtained by calling nag_lapack_dtpcon (f07ug) with

norm_p ='I'

Further Comments

The total number of floating-point operations is approximately

n^{2} r

The complex analogue of this function is nag_lapack_ztptrs (f07us).

Example

This example solves the system of equations

A X = B

, where

A = (\begin{matrix} 4.30 & 0.00 & 0.00 & 0.00 \\ - 3.96 & - 4.87 & 0.00 & 0.00 \\ 0.40 & 0.31 & - 8.02 & 0.00 \\ - 0.27 & 0.07 & - 5.95 & 0.12 \end{matrix}) and B = (\begin{matrix} - 12.90 & - 21.50 \\ 16.75 & 14.93 \\ - 17.55 & 6.33 \\ - 11.04 & 8.09 \end{matrix}),

using packed storage for

A

Open in the MATLAB editor: f07ue_example

function f07ue_example


fprintf('f07ue example results\n\n');

% Solve AX=B where A is Lower triangular and packed
ap = [ 4.30; -3.96;  0.40; -0.27;
             -4.87;  0.31;  0.07;
                    -8.02; -5.95;
                            0.12];
b = [-12.90, -21.50;
      16.75,  14.93;
     -17.55,   6.33;
     -11.04,   8.09];

% Solve
uplo = 'L';
trans = 'N';
diag = 'N';
[x, info] = f07ue( ...
                   uplo, trans, diag, ap, b);

% Display solution
[ifail] = x04ca( ...
                 'Gen', diag, x, 'Solution(s)');

f07ue example results

 Solution(s)
             1          2
 1     -3.0000    -5.0000
 2     -1.0000     1.0000
 3      2.0000    -1.0000
 4      1.0000     6.0000

PDF version (NAG web site, 64-bit version, 64-bit version)

Chapter Contents

Chapter Introduction

NAG Toolbox