zdrvgbx.f3

Usage

Functions/Subroutines

ZDRVGBX

Function/Subroutine Documentation

subroutine zdrvgb (logical, dimension( * ) dotype, integer nn, integer, dimension( * ) nval, integer nrhs, double precision thresh, logical tsterr, complex16, dimension( ) a, integer la, complex16, dimension( ) afb, integer lafb, complex16, dimension( ) asav, complex16, dimension( ) b, complex16, dimension( ) bsav, complex16, dimension( ) x, complex16, dimension( ) xact, double precision, dimension( * ) s, complex16, dimension( ) work, double precision, dimension( * ) rwork, integer, dimension( * ) iwork, integer nout)

ZDRVGBX

Purpose:

!>
!> ZDRVGB tests the driver routines ZGBSV, -SVX, and -SVXX.
!>
!> Note that this file is used only when the XBLAS are available,
!> otherwise zdrvgb.f defines this subroutine.
!>

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

!>          A is COMPLEX*16 array, dimension (LA)
!>

!>          LA is INTEGER
!>          The length of the array A.  LA >= (2*NMAX-1)*NMAX
!>          where NMAX is the largest entry in NVAL.
!>

AFB

!>          AFB is COMPLEX*16 array, dimension (LAFB)
!>

LAFB

!>          LAFB is INTEGER
!>          The length of the array AFB.  LAFB >= (3*NMAX-2)*NMAX
!>          where NMAX is the largest entry in NVAL.
!>

ASAV

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

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

BSAV

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

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

XACT

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

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

WORK

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

RWORK

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

IWORK

!>          IWORK is INTEGER array, dimension (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 172 of file zdrvgbx.f.