cchktz.f3

Usage

Functions/Subroutines

CCHKTZ

Function/Subroutine Documentation

subroutine cchktz (logical, dimension( * ) dotype, integer nm, integer, dimension( * ) mval, integer nn, integer, dimension( * ) nval, real thresh, logical tsterr, complex, dimension( * ) a, complex, dimension( * ) copya, real, dimension( * ) s, complex, dimension( * ) tau, complex, dimension( * ) work, real, dimension( * ) rwork, integer nout)

CCHKTZ

Purpose:

!>
!> CCHKTZ tests CTZRZF.
!>

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

!>          NM is INTEGER
!>          The number of values of M contained in the vector MVAL.
!>

MVAL

!>          MVAL is INTEGER array, dimension (NM)
!>          The values of the matrix row dimension M.
!>

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

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

!>          A is COMPLEX array, dimension (MMAX*NMAX)
!>          where MMAX is the maximum value of M in MVAL and NMAX is the
!>          maximum value of N in NVAL.
!>

COPYA

!>          COPYA is COMPLEX array, dimension (MMAX*NMAX)
!>

!>          S is REAL array, dimension
!>                      (min(MMAX,NMAX))
!>

TAU

!>          TAU is COMPLEX array, dimension (MMAX)
!>

WORK

!>          WORK is COMPLEX array, dimension
!>                      (MMAX*NMAX + 4*NMAX + MMAX)
!>

RWORK

!>          RWORK is REAL 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 135 of file cchktz.f.