This manual relates to an old release of the Library.
The documentation for the current release is also available on this site.

NAG FL Interface
f06pjf (dtrsv)

Settings help

FL Name Style:


FL Specification Language:


1 Purpose

f06pjf solves a real triangular system of equations with a single right-hand side.

2 Specification

Fortran Interface
Subroutine f06pjf ( uplo, trans, diag, n, a, lda, x, incx)
Integer, Intent (In) :: n, lda, incx
Real (Kind=nag_wp), Intent (In) :: a(lda,*)
Real (Kind=nag_wp), Intent (Inout) :: x(*)
Character (1), Intent (In) :: uplo, trans, diag
C Header Interface
#include <nag.h>
void  f06pjf_ (const char *uplo, const char *trans, const char *diag, const Integer *n, const double a[], const Integer *lda, double x[], const Integer *incx, const Charlen length_uplo, const Charlen length_trans, const Charlen length_diag)
The routine may be called by the names f06pjf, nagf_blas_dtrsv or its BLAS name dtrsv.

3 Description

f06pjf performs one of the matrix-vector operations
xA-1x   or   xA-Tx ,  
where A is an n×n real triangular matrix, and x is an n-element real vector. A-T denotes (AT)-1 or equivalently (A-1)T .
No test for singularity or near-singularity of A is included in this routine. Such tests must be performed before calling this routine.

4 References

None.

5 Arguments

1: uplo Character(1) Input
On entry: specifies whether A is upper or lower triangular.
uplo='U'
A is upper triangular.
uplo='L'
A is lower triangular.
Constraint: uplo='U' or 'L'.
2: trans Character(1) Input
On entry: specifies the operation to be performed.
trans='N'
xA-1x.
trans='T' or 'C'
xA-Tx.
Constraint: trans='N', 'T' or 'C'.
3: diag Character(1) Input
On entry: specifies whether A has nonunit or unit diagonal elements.
diag='N'
The diagonal elements are stored explicitly.
diag='U'
The diagonal elements are assumed to be 1, and are not referenced.
Constraint: diag='N' or 'U'.
4: n Integer Input
On entry: n, the order of the matrix A.
Constraint: n0.
5: a(lda,*) Real (Kind=nag_wp) array Input
Note: the second dimension of the array a must be at least n.
On entry: the n×n triangular matrix A.
  • If uplo='U', A is upper triangular and the elements of the array below the diagonal are not referenced.
  • If uplo='L', A is lower triangular and the elements of the array above the diagonal are not referenced.
  • If diag='U', the diagonal elements of A are assumed to be 1, and are not referenced.
6: lda Integer Input
On entry: the first dimension of the array a as declared in the (sub)program from which f06pjf is called.
Constraint: lda max(1,n) .
7: x(*) Real (Kind=nag_wp) array Input/Output
Note: the dimension of the array x must be at least max(1, 1+(n-1) ×|incx| ) .
On entry: the n-element vector x.
If incx>0, xi must be stored in x(1+(i1)×incx) , for i=1,2,,n.
If incx<0, xi must be stored in x(1(ni)×incx) , for i=1,2,,n.
On exit: the updated vector x stored in the array elements used to supply the original vector x.
8: incx Integer Input
On entry: the increment in the subscripts of x between successive elements of x.
Constraint: incx0.

6 Error Indicators and Warnings

None.

7 Accuracy

Not applicable.

8 Parallelism and Performance

f06pjf is not threaded in any implementation.

9 Further Comments

None.

10 Example

None.