schkpp.f3

Usage

Functions/Subroutines

SCHKPP

Function/Subroutine Documentation

subroutine schkpp (logical, dimension( * ) dotype, integer nn, integer, dimension( * ) nval, integer nns, integer, dimension( * ) nsval, 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)

SCHKPP

Purpose:

!>
!> SCHKPP tests SPPTRF, -TRI, -TRS, -RFS, and -CON
!>

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

NNS

!>          NNS is INTEGER
!>          The number of values of NRHS contained in the vector NSVAL.
!>

NSVAL

!>          NSVAL is INTEGER array, dimension (NNS)
!>          The values of the number of right hand sides NRHS.
!>

THRESH

!>          THRESH is REAL
!>          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 is REAL array, dimension
!>                      (NMAX*(NMAX+1)/2)
!>

AFAC

!>          AFAC is REAL array, dimension
!>                      (NMAX*(NMAX+1)/2)
!>

AINV

!>          AINV is REAL array, dimension
!>                      (NMAX*(NMAX+1)/2)
!>

!>          B is REAL array, dimension (NMAX*NSMAX)
!>          where NSMAX is the largest entry in NSVAL.
!>

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

XACT

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

WORK

!>          WORK is REAL array, dimension
!>                      (NMAX*max(3,NSMAX))
!>

RWORK

!>          RWORK is REAL array, dimension
!>                      (max(NMAX,2*NSMAX))
!>

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 160 of file schkpp.f.