zgtts2 (3p)

Name

zgtts2 - solve a system of linear equations with a tridiagonal matrix using the LU factorization computed by zgttrf

Synopsis

SUBROUTINE ZGTTS2(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


INTEGER ITRANS, LDB, N, NRHS

INTEGER IPIV(*)

DOUBLE COMPLEX B(LDB,*), D(*), DL(*), DU(*) ,DU2(*)


SUBROUTINE ZGTTS2_64(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


INTEGER*8 ITRANS, LDB, N, NRHS

INTEGER*8 IPIV(*)

DOUBLE COMPLEX B(LDB,*), D(*), DL(*), DU(*), DU2(*)


F95 INTERFACE
SUBROUTINE GTTS2(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


INTEGER :: ITRANS, N, NRHS, LDB

INTEGER, DIMENSION(:) :: IPIV

COMPLEX(8), DIMENSION(:) :: DL, D, DU, DU2

COMPLEX(8), DIMENSION(:,:) :: B


SUBROUTINE GTTS2_64(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


INTEGER(8) :: ITRANS, N, NRHS, LDB

INTEGER(8), DIMENSION(:) :: IPIV

COMPLEX(8), DIMENSION(:) :: DL, D, DU, DU2

COMPLEX(8), DIMENSION(:,:) :: B


C INTERFACE
#include <sunperf.h>

void zgtts2 (int itrans, int n, int nrhs, doublecomplex *dl, doublecom-
plex  *d,  doublecomplex  *du, doublecomplex *du2, int *ipiv,
doublecomplex *b, int ldb);


void zgtts2_64 (long itrans, long n, long nrhs, doublecomplex *dl, dou-
blecomplex  *d,  doublecomplex  *du, doublecomplex *du2, long
*ipiv, doublecomplex *b, long ldb);

Description

Oracle Solaris Studio Performance Library                           zgtts2(3P)



NAME
       zgtts2  -  solve a system of linear equations with a tridiagonal matrix
       using the LU factorization computed by zgttrf


SYNOPSIS
       SUBROUTINE ZGTTS2(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


       INTEGER ITRANS, LDB, N, NRHS

       INTEGER IPIV(*)

       DOUBLE COMPLEX B(LDB,*), D(*), DL(*), DU(*) ,DU2(*)


       SUBROUTINE ZGTTS2_64(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


       INTEGER*8 ITRANS, LDB, N, NRHS

       INTEGER*8 IPIV(*)

       DOUBLE COMPLEX B(LDB,*), D(*), DL(*), DU(*), DU2(*)


   F95 INTERFACE
       SUBROUTINE GTTS2(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


       INTEGER :: ITRANS, N, NRHS, LDB

       INTEGER, DIMENSION(:) :: IPIV

       COMPLEX(8), DIMENSION(:) :: DL, D, DU, DU2

       COMPLEX(8), DIMENSION(:,:) :: B


       SUBROUTINE GTTS2_64(ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB)


       INTEGER(8) :: ITRANS, N, NRHS, LDB

       INTEGER(8), DIMENSION(:) :: IPIV

       COMPLEX(8), DIMENSION(:) :: DL, D, DU, DU2

       COMPLEX(8), DIMENSION(:,:) :: B


   C INTERFACE
       #include <sunperf.h>

       void zgtts2 (int itrans, int n, int nrhs, doublecomplex *dl, doublecom-
                 plex  *d,  doublecomplex  *du, doublecomplex *du2, int *ipiv,
                 doublecomplex *b, int ldb);


       void zgtts2_64 (long itrans, long n, long nrhs, doublecomplex *dl, dou-
                 blecomplex  *d,  doublecomplex  *du, doublecomplex *du2, long
                 *ipiv, doublecomplex *b, long ldb);


PURPOSE
       zgtts2 solves one of the  systems  of  equations  A*X=B,  A**T*X=B,  or
       A**H*X=B,  with  a tridiagonal matrix A using the LU factorization com-
       puted by ZGTTRF.



ARGUMENTS
       ITRANS (input)
                 ITRANS is INTEGER
                 Specifies the form of the system of equations.
                 = 0:  A * X = B     (No transpose),
                 = 1:  A**T * X = B  (Transpose),
                 = 2:  A**H * X = B  (Conjugate transpose).


       N (input)
                 N is INTEGER
                 The order of the matrix A.


       NRHS (input)
                 NRHS is INTEGER
                 The number of right hand sides, i.e., the number  of  columns
                 of the matrix B. NRHS >= 0.


       DL (input)
                 DL is COMPLEX*16 array, dimension (N-1)
                 The (N-1) multipliers that define the matrix L from the
                 LU factorization of A.


       D (input)
                 D is COMPLEX*16 array, dimension (N)
                 The n diagonal elements of the upper triangular matrix U from
                 the LU factorization of A.


       DU (input)
                 DU is COMPLEX*16 array, dimension (N-1)
                 The (n-1) elements of the first super-diagonal of U.


       DU2 (input)
                 DU2 is COMPLEX*16 array, dimension (N-2)
                 The (N-2) elements of the second super-diagonal of U.


       IPIV (input)
                 IPIV is INTEGER array, dimension (N)
                 The pivot indices; for 1 <= i <= N, row i of the  matrix  was
                 interchanged with row IPIV(i).  IPIV(i) will always be either
                 i or i+1; IPIV(i) = i indicates a row interchange was not
                 required.


       B (input/output)
                 B is COMPLEX*16 array, dimension (LDB,NRHS)
                 On entry, the matrix of right hand side vectors B.
                 On exit, B is overwritten by the solution vectors X.


       LDB (input)
                 LDB is INTEGER
                 The leading dimension of the array B. LDB >= max(1,N).



                                  7 Nov 2015                        zgtts2(3P)