clattr.f3

Usage

Functions/Subroutines

subroutine clattr (imat, uplo, trans, diag, iseed, n, a, lda, b, work, rwork, info)
CLATTR

Function/Subroutine Documentation

subroutine clattr (integer imat, character uplo, character trans, character diag, integer, dimension( 4 ) iseed, integer n, complex, dimension( lda, * ) a, integer lda, complex, dimension( * ) b, complex, dimension( * ) work, real, dimension( * ) rwork, integer info)

CLATTR

Purpose:

!>
!> CLATTR generates a triangular test matrix in 2-dimensional storage.
!> IMAT and UPLO uniquely specify the properties of the test matrix,
!> which is returned in the array A.
!>

Parameters

IMAT

!>          IMAT is INTEGER
!>          An integer key describing which matrix to generate for this
!>          path.
!>

UPLO

!>          UPLO is CHARACTER*1
!>          Specifies whether the matrix A will be upper or lower
!>          triangular.
!>          = 'U':  Upper triangular
!>          = 'L':  Lower triangular
!>

TRANS

!>          TRANS is CHARACTER*1
!>          Specifies whether the matrix or its transpose will be used.
!>          = 'N':  No transpose
!>          = 'T':  Transpose
!>          = 'C':  Conjugate transpose
!>

DIAG

!>          DIAG is CHARACTER*1
!>          Specifies whether or not the matrix A is unit triangular.
!>          = 'N':  Non-unit triangular
!>          = 'U':  Unit triangular
!>

ISEED

!>          ISEED is INTEGER array, dimension (4)
!>          The seed vector for the random number generator (used in
!>          CLATMS).  Modified on exit.
!>

!>          N is INTEGER
!>          The order of the matrix to be generated.
!>

!>          A is COMPLEX array, dimension (LDA,N)
!>          The triangular matrix A.  If UPLO = 'U', the leading N x N
!>          upper triangular part of the array A contains the upper
!>          triangular matrix, and the strictly lower triangular part of
!>          A is not referenced.  If UPLO = 'L', the leading N x N lower
!>          triangular part of the array A contains the lower triangular
!>          matrix and the strictly upper triangular part of A is not
!>          referenced.
!>

LDA

!>          LDA is INTEGER
!>          The leading dimension of the array A.  LDA >= max(1,N).
!>

!>          B is COMPLEX array, dimension (N)
!>          The right hand side vector, if IMAT > 10.
!>

WORK

!>          WORK is COMPLEX array, dimension (2*N)
!>

RWORK

!>          RWORK is REAL array, dimension (N)
!>

INFO

!>          INFO is INTEGER
!>          = 0:  successful exit
!>          < 0:  if INFO = -i, the i-th argument had an illegal value
!>

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 136 of file clattr.f.