TESTING/LIN/sdrvsy_rook.f(3)

NAME
TESTING/LIN/sdrvsy_rook.f

SYNOPSIS

  Functions/Subroutines
subroutine sdrvsy_rook (dotype, nn, nval, nrhs, thresh, tsterr, nmax, a, afac, ainv, b, x, xact, work, rwork, iwork, nout)
SDRVSY_ROOK

Function/Subroutine Documentation

  subroutine sdrvsy_rook (logical, dimension( * ) dotype, integer nn, integer, dimension( * ) nval, integer nrhs, real thresh, logical tsterr, integer nmax, real, dimension( * ) a, real, dimension( * ) afac, real, dimension( * ) ainv, real, dimension( * ) b, real, dimension( * ) x, real, dimension( * ) xact, real, dimension( * ) work, real, dimension( * ) rwork, integer, dimension( * ) iwork, integer nout)

SDRVSY_ROOK

Purpose:

    !>
    !> SDRVSY_ROOK tests the driver routines SSYSV_ROOK.
    !>

Parameters
    DOTYPE

    !>          DOTYPE is LOGICAL array, dimension (NTYPES)
    !>          The matrix types to be used for testing.  Matrices of type j
    !>          (for 1 <= j <= NTYPES) are used for testing if DOTYPE(j) =
    !>          .TRUE.; if DOTYPE(j) = .FALSE., then type j is not used.
    !>

    NN

    !>          NN is INTEGER
    !>          The number of values of N contained in the vector NVAL.
    !>

    NVAL

    !>          NVAL is INTEGER array, dimension (NN)
    !>          The values of the matrix dimension N.
    !>

    NRHS

    !>          NRHS is INTEGER
    !>          The number of right hand side vectors to be generated for
    !>          each linear system.
    !>

    THRESH

    !>          THRESH is DOUBLE PRECISION
    !>          The threshold value for the test ratios.  A result is
    !>          included in the output file if RESULT >= THRESH.  To have
    !>          every test ratio printed, use THRESH = 0.
    !>

    TSTERR

    !>          TSTERR is LOGICAL
    !>          Flag that indicates whether error exits are to be tested.
    !>

    NMAX

    !>          NMAX is INTEGER
    !>          The maximum value permitted for N, used in dimensioning the
    !>          work arrays.
    !>

    A

    !>          A is REAL array, dimension (NMAX*NMAX)
    !>

    AFAC

    !>          AFAC is REAL array, dimension (NMAX*NMAX)
    !>

    AINV

    !>          AINV is REAL array, dimension (NMAX*NMAX)
    !>

    B

    !>          B is REAL array, dimension (NMAX*NRHS)
    !>

    X

    !>          X is REAL array, dimension (NMAX*NRHS)
    !>

    XACT

    !>          XACT is REAL array, dimension (NMAX*NRHS)
    !>

    WORK

    !>          WORK is REAL array, dimension
    !>                      (NMAX*max(2,NRHS))
    !>

    RWORK

    !>          RWORK is REAL array, dimension (NMAX+2*NRHS)
    !>

    IWORK

    !>          IWORK is INTEGER array, dimension (2*NMAX)
    !>

    NOUT

    !>          NOUT is INTEGER
    !>          The unit number for output.
    !>

Author
    Univ. of Tennessee

    Univ. of California Berkeley

    Univ. of Colorado Denver

    NAG Ltd.

Definition at line 150 of file sdrvsy_rook.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.