cdrvrf4()

subroutine cdrvrf4	(	integer	nout,
		integer	nn,
		integer, dimension( nn )	nval,
		real	thresh,
		complex, dimension( ldc, * )	c1,
		complex, dimension( ldc, *)	c2,
		integer	ldc,
		complex, dimension( * )	crf,
		complex, dimension( lda, * )	a,
		integer	lda,
		real, dimension( * )	s_work_clange
	)

CDRVRF4

Purpose:

 CDRVRF4 tests the LAPACK RFP routines:
     CHFRK

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 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.
[out]	C1	C1 is COMPLEX array, dimension (LDC,NMAX)
[out]	C2	C2 is COMPLEX array, dimension (LDC,NMAX)
[in]	LDC	LDC is INTEGER The leading dimension of the array A. LDA >= max(1,NMAX).
[out]	CRF	CRF is COMPLEX array, dimension ((NMAX*(NMAX+1))/2).
[out]	A	A is COMPLEX array, dimension (LDA,NMAX)
[in]	LDA	LDA is INTEGER The leading dimension of the array A. LDA >= max(1,NMAX).
[out]	S_WORK_CLANGE	S_WORK_CLANGE is REAL array, dimension (NMAX)

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.