NAG Library Routine Document

f06sjf (ztrsv)

1
Purpose

f06sjf (ztrsv) solves a complex triangular system of equations with a single right-hand side.

2
Specification

Fortran Interface
Subroutine f06sjf ( uplo, trans, diag, n, a, lda, x, incx)
Integer, Intent (In):: n, lda, incx
Complex (Kind=nag_wp), Intent (In):: a(lda,*)
Complex (Kind=nag_wp), Intent (Inout):: x(*)
Character (1), Intent (In):: uplo, trans, diag
C Header Interface
#include <nagmk26.h>
void  f06sjf_ (const char *uplo, const char *trans, const char *diag, const Integer *n, const Complex a[], const Integer *lda, Complex x[], const Integer *incx, const Charlen length_uplo, const Charlen length_trans, const Charlen length_diag)
The routine may be called by its BLAS name ztrsv.

3
Description

f06sjf (ztrsv) performs one of the matrix-vector operations
xA-1x ,   xA-Tx   or   xA-Hx ,  
where A is an n by n complex triangular matrix, and x is an n-element complex vector. A-T  denotes AT-1  or equivalently A-1T ; A-H  denotes AH-1  or equivalently A-1H .
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'
xA-Tx.
trans='C'
xA-Hx.
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 – IntegerInput
On entry: n, the order of the matrix A.
Constraint: n0.
5:     alda* – Complex (Kind=nag_wp) arrayInput
Note: the second dimension of the array a must be at least n.
On entry: the n by 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 – IntegerInput
On entry: the first dimension of the array a as declared in the (sub)program from which f06sjf (ztrsv) is called.
Constraint: lda max1,n .
7:     x* – Complex (Kind=nag_wp) arrayInput/Output
Note: the dimension of the array x must be at least max1, 1+n-1 ×incx .
On entry: the vector x.
If incx>0, xi must be stored in x1+i1×incx , for i=1,2,,n.
If incx<0, xi must be stored in x1ni×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 – IntegerInput
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

f06sjf (ztrsv) is not threaded in any implementation.

9
Further Comments

None.

10
Example

None.