TESTING/LIN/zdrvpo.f(3)

NAME
TESTING/LIN/zdrvpo.f

SYNOPSIS

  Functions/Subroutines
subroutine zdrvpo (dotype, nn, nval, nrhs, thresh, tsterr, nmax, a, afac, asav, b, bsav, x, xact, s, work, rwork, nout)
ZDRVPO

Function/Subroutine Documentation

  subroutine zdrvpo (logical, dimension( * ) dotype, integer nn, integer, dimension( * ) nval, integer nrhs, double precision thresh, logical tsterr, integer nmax, complex*16, dimension( * ) a, complex*16, dimension( * ) afac, complex*16, dimension( * ) asav, complex*16, dimension( * ) b, complex*16, dimension( * ) bsav, complex*16, dimension( * ) x, complex*16, dimension( * ) xact, double precision, dimension( * ) s, complex*16, dimension( * ) work, double precision, dimension( * ) rwork, integer nout)

ZDRVPO

Purpose:

    !>
    !> ZDRVPO tests the driver routines ZPOSV and -SVX.
    !>

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 COMPLEX*16 array, dimension (NMAX*NMAX)
    !>

    AFAC

    !>          AFAC is COMPLEX*16 array, dimension (NMAX*NMAX)
    !>

    ASAV

    !>          ASAV is COMPLEX*16 array, dimension (NMAX*NMAX)
    !>

    B

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

    BSAV

    !>          BSAV is COMPLEX*16 array, dimension (NMAX*NRHS)
    !>

    X

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

    XACT

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

    S

    !>          S is DOUBLE PRECISION array, dimension (NMAX)
    !>

    WORK

    !>          WORK is COMPLEX*16 array, dimension
    !>                      (NMAX*max(3,NRHS))
    !>

    RWORK

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

    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 156 of file zdrvpo.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.