zchkqr()

subroutine zchkqr	(	logical, dimension( * )	DOTYPE,
		integer	NM,
		integer, dimension( * )	MVAL,
		integer	NN,
		integer, dimension( * )	NVAL,
		integer	NNB,
		integer, dimension( * )	NBVAL,
		integer, dimension( * )	NXVAL,
		integer	NRHS,
		double precision	THRESH,
		logical	TSTERR,
		integer	NMAX,
		complex*16, dimension( * )	A,
		complex*16, dimension( * )	AF,
		complex*16, dimension( * )	AQ,
		complex*16, dimension( * )	AR,
		complex*16, dimension( * )	AC,
		complex*16, dimension( * )	B,
		complex*16, dimension( * )	X,
		complex*16, dimension( * )	XACT,
		complex*16, dimension( * )	TAU,
		complex*16, dimension( * )	WORK,
		double precision, dimension( * )	RWORK,
		integer, dimension( * )	IWORK,
		integer	NOUT
	)

ZCHKQR

Purpose:

 ZCHKQR tests ZGEQRF, ZUNGQR and ZUNMQR.

Parameters

[in]	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.
[in]	NM	NM is INTEGER The number of values of M contained in the vector MVAL.
[in]	MVAL	MVAL is INTEGER array, dimension (NM) The values of the matrix row dimension M.
[in]	NN	NN is INTEGER The number of values of N contained in the vector NVAL.
[in]	NVAL	NVAL is INTEGER array, dimension (NN) The values of the matrix column dimension N.
[in]	NNB	NNB is INTEGER The number of values of NB and NX contained in the vectors NBVAL and NXVAL. The blocking parameters are used in pairs (NB,NX).
[in]	NBVAL	NBVAL is INTEGER array, dimension (NNB) The values of the blocksize NB.
[in]	NXVAL	NXVAL is INTEGER array, dimension (NNB) The values of the crossover point NX.
[in]	NRHS	NRHS is INTEGER The number of right hand side vectors to be generated for each linear system.
[in]	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.
[in]	TSTERR	TSTERR is LOGICAL Flag that indicates whether error exits are to be tested.
[in]	NMAX	NMAX is INTEGER The maximum value permitted for M or N, used in dimensioning the work arrays.
[out]	A	A is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	AF	AF is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	AQ	AQ is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	AR	AR is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	AC	AC is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	B	B is COMPLEX*16 array, dimension (NMAX*NRHS)
[out]	X	X is COMPLEX*16 array, dimension (NMAX*NRHS)
[out]	XACT	XACT is COMPLEX*16 array, dimension (NMAX*NRHS)
[out]	TAU	TAU is COMPLEX*16 array, dimension (NMAX)
[out]	WORK	WORK is COMPLEX*16 array, dimension (NMAX*NMAX)
[out]	RWORK	RWORK is DOUBLE PRECISION array, dimension (NMAX)
[out]	IWORK	IWORK is INTEGER array, dimension (NMAX)
[in]	NOUT	NOUT is INTEGER The unit number for output.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.