TESTING/LIN/clarhs.f(3)

NAME
TESTING/LIN/clarhs.f

SYNOPSIS

  Functions/Subroutines
subroutine clarhs (path, xtype, uplo, trans, m, n, kl, ku, nrhs, a, lda, x, ldx, b, ldb, iseed, info)
CLARHS

Function/Subroutine Documentation

  subroutine clarhs (character*3 path, character xtype, character uplo, character trans, integer m, integer n, integer kl, integer ku, integer nrhs, complex, dimension( lda, * ) a, integer lda, complex, dimension( ldx, * ) x, integer ldx, complex, dimension( ldb, * ) b, integer ldb, integer, dimension( 4 ) iseed, integer info)

CLARHS

Purpose:

     CLARHS chooses a set of NRHS random solution vectors and sets
     up the right hand sides for the linear system
        op(A) * X = B,
     where op(A) = A, A**T, or A**H, depending on TRANS.

Parameters
    PATH

              PATH is CHARACTER*3
              The type of the complex matrix A.  PATH may be given in any
              combination of upper and lower case.  Valid paths include
                 xGE:  General m x n matrix
                 xGB:  General banded matrix
                 xPO:  Hermitian positive definite, 2-D storage
                 xPP:  Hermitian positive definite packed
                 xPB:  Hermitian positive definite banded
                 xHE:  Hermitian indefinite, 2-D storage
                 xHP:  Hermitian indefinite packed
                 xHB:  Hermitian indefinite banded
                 xSY:  Symmetric indefinite, 2-D storage
                 xSP:  Symmetric indefinite packed
                 xSB:  Symmetric indefinite banded
                 xTR:  Triangular
                 xTP:  Triangular packed
                 xTB:  Triangular banded
                 xQR:  General m x n matrix
                 xLQ:  General m x n matrix
                 xQL:  General m x n matrix
                 xRQ:  General m x n matrix
              where the leading character indicates the precision.

    XTYPE

              XTYPE is CHARACTER*1
              Specifies how the exact solution X will be determined:
              = 'N':  New solution; generate a random X.
              = 'C':  Computed; use value of X on entry.

    UPLO

              UPLO is CHARACTER*1
              Used only if A is symmetric or triangular; specifies whether
              the upper or lower triangular part of the matrix A is stored.
              = 'U':  Upper triangular
              = 'L':  Lower triangular

    TRANS

              TRANS is CHARACTER*1
              Used only if A is nonsymmetric; specifies the operation
              applied to the matrix A.
              = 'N':  B := A    * X  (No transpose)
              = 'T':  B := A**T * X  (Transpose)
              = 'C':  B := A**H * X  (Conjugate transpose)

    M

              M is INTEGER
              The number of rows of the matrix A.  M >= 0.

    N

              N is INTEGER
              The number of columns of the matrix A.  N >= 0.

    KL

              KL is INTEGER
              Used only if A is a band matrix; specifies the number of
              subdiagonals of A if A is a general band matrix or if A is
              symmetric or triangular and UPLO = 'L'; specifies the number
              of superdiagonals of A if A is symmetric or triangular and
              UPLO = 'U'.  0 <= KL <= M-1.

    KU

              KU is INTEGER
              Used only if A is a general band matrix or if A is
              triangular.
              If PATH = xGB, specifies the number of superdiagonals of A,
              and 0 <= KU <= N-1.
              If PATH = xTR, xTP, or xTB, specifies whether or not the
              matrix has unit diagonal:
              = 1:  matrix has non-unit diagonal (default)
              = 2:  matrix has unit diagonal

    NRHS

              NRHS is INTEGER
              The number of right hand side vectors in the system A*X = B.

    A

              A is COMPLEX array, dimension (LDA,N)
              The test matrix whose type is given by PATH.

    LDA

              LDA is INTEGER
              The leading dimension of the array A.
              If PATH = xGB, LDA >= KL+KU+1.
              If PATH = xPB, xSB, xHB, or xTB, LDA >= KL+1.
              Otherwise, LDA >= max(1,M).

    X

              X is or output) COMPLEX array, dimension (LDX,NRHS)
              On entry, if XTYPE = 'C' (for 'Computed'), then X contains
              the exact solution to the system of linear equations.
              On exit, if XTYPE = 'N' (for 'New'), then X is initialized
              with random values.

    LDX

              LDX is INTEGER
              The leading dimension of the array X.  If TRANS = 'N',
              LDX >= max(1,N); if TRANS = 'T', LDX >= max(1,M).

    B

              B is COMPLEX array, dimension (LDB,NRHS)
              The right hand side vector(s) for the system of equations,
              computed from B = op(A) * X, where op(A) is determined by
              TRANS.

    LDB

              LDB is INTEGER
              The leading dimension of the array B.  If TRANS = 'N',
              LDB >= max(1,M); if TRANS = 'T', LDB >= max(1,N).

    ISEED

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

    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 206 of file clarhs.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.