zdrvrf3()

subroutine zdrvrf3	(	integer	NOUT,
		integer	NN,
		integer, dimension( nn )	NVAL,
		double precision	THRESH,
		complex*16, dimension( lda, * )	A,
		integer	LDA,
		complex*16, dimension( * )	ARF,
		complex*16, dimension( lda, * )	B1,
		complex*16, dimension( lda, * )	B2,
		double precision, dimension( * )	D_WORK_ZLANGE,
		complex*16, dimension( * )	Z_WORK_ZGEQRF,
		complex*16, dimension( * )	TAU
	)

ZDRVRF3

Purpose:

 ZDRVRF3 tests the LAPACK RFP routines:
     ZTFSM

Parameters

[in]	NOUT	NOUT is INTEGER The unit number for output.
[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 dimension N.
[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.
[out]	A	A is COMPLEX*16 array, dimension (LDA,NMAX)
[in]	LDA	LDA is INTEGER The leading dimension of the array A. LDA >= max(1,NMAX).
[out]	ARF	ARF is COMPLEX*16 array, dimension ((NMAX*(NMAX+1))/2).
[out]	B1	B1 is COMPLEX*16 array, dimension (LDA,NMAX)
[out]	B2	B2 is COMPLEX*16 array, dimension (LDA,NMAX)
[out]	D_WORK_ZLANGE	D_WORK_ZLANGE is DOUBLE PRECISION array, dimension (NMAX)
[out]	Z_WORK_ZGEQRF	Z_WORK_ZGEQRF is COMPLEX*16 array, dimension (NMAX)
[out]	TAU	TAU is COMPLEX*16 array, dimension (NMAX)

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.