TESTING/LIN/clattr.f(3)

NAME
TESTING/LIN/clattr.f

SYNOPSIS

  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

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

    A

    !>          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

    !>          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.

Author

Generated automatically by Doxygen for LAPACK from the source code.