BLAS/TESTING/zblat3.f File Reference

Go to the source code of this file.

Functions/Subroutines
program	ZBLAT3
subroutine	ZCHK1 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, A, AA, AS, B, BB, BS, C, CC, CS, CT, G)
subroutine	ZCHK2 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, A, AA, AS, B, BB, BS, C, CC, CS, CT, G)
subroutine	ZCHK3 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, A, AA, AS, B, BB, BS, CT, G, C)
subroutine	ZCHK4 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, A, AA, AS, B, BB, BS, C, CC, CS, CT, G)
subroutine	ZCHK5 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, AB, AA, AS, BB, BS, C, CC, CS, CT, G, W)
subroutine	ZCHKE (ISNUM, SRNAMT, NOUT)
subroutine	ZMAKE (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET, TRANSL)
subroutine	ZMMCH (TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, BETA, C, LDC, CT, G, CC, LDCC, EPS, ERR, FATAL, NOUT, MV)
LOGICAL	LZE (RI, RJ, LR)
LOGICAL	LZERES (TYPE, UPLO, M, N, AA, AS, LDA)
program	__zblat3.f__
DOUBLE PRECISION	DDIFF (X, Y)
subroutine	CHKXER (SRNAMT, INFOT, NOUT, LERR, OK)
subroutine	XERBLA (SRNAME, INFO)

---

Function Documentation

program __zblat3.f__

(

)

Definition at line 3323 of file zblat3.f.

subroutine CHKXER	(	CHARACTER*6	SRNAMT,
		INTEGER	INFOT,
		INTEGER	NOUT,
		LOGICAL	LERR,
		LOGICAL	OK
	)

Definition at line 3382 of file zblat3.f.

DOUBLE PRECISION DDIFF	(	DOUBLE PRECISION	X,
		DOUBLE PRECISION	Y
	)

Definition at line 3363 of file zblat3.f.

LOGICAL LZE	(	COMPLEX*16,dimension( * )	RI,
		COMPLEX*16,dimension( * )	RJ,
		INTEGER	LR
	)

Definition at line 3215 of file zblat3.f.

LOGICAL LZERES	(	CHARACTER*2	TYPE,
		CHARACTER*1	UPLO,
		INTEGER	M,
		INTEGER	N,
		COMPLEX*16,dimension( lda, * )	AA,
		COMPLEX*16,dimension( lda, * )	AS,
		INTEGER	LDA
	)

Definition at line 3247 of file zblat3.f.

subroutine XERBLA	(	CHARACTER*6	SRNAME,
		INTEGER	INFO
	)

Definition at line 3412 of file zblat3.f.

program ZBLAT3

(

)

Definition at line 1 of file zblat3.f.

subroutine ZCHK1	(	CHARACTER*6	SNAME,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX*16,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX*16,dimension( nbet )	BET,
		INTEGER	NMAX,
		COMPLEX*16,dimension( nmax, nmax )	A,
		COMPLEX*16,dimension( nmax*nmax )	AA,
		COMPLEX*16,dimension( nmax*nmax )	AS,
		COMPLEX*16,dimension( nmax, nmax )	B,
		COMPLEX*16,dimension( nmax*nmax )	BB,
		COMPLEX*16,dimension( nmax*nmax )	BS,
		COMPLEX*16,dimension( nmax, nmax )	C,
		COMPLEX*16,dimension( nmax*nmax )	CC,
		COMPLEX*16,dimension( nmax*nmax )	CS,
		COMPLEX*16,dimension( nmax )	CT,
		DOUBLE PRECISION,dimension( nmax )	G
	)

Definition at line 371 of file zblat3.f.

subroutine ZCHK2	(	CHARACTER*6	SNAME,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX*16,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX*16,dimension( nbet )	BET,
		INTEGER	NMAX,
		COMPLEX*16,dimension( nmax, nmax )	A,
		COMPLEX*16,dimension( nmax*nmax )	AA,
		COMPLEX*16,dimension( nmax*nmax )	AS,
		COMPLEX*16,dimension( nmax, nmax )	B,
		COMPLEX*16,dimension( nmax*nmax )	BB,
		COMPLEX*16,dimension( nmax*nmax )	BS,
		COMPLEX*16,dimension( nmax, nmax )	C,
		COMPLEX*16,dimension( nmax*nmax )	CC,
		COMPLEX*16,dimension( nmax*nmax )	CS,
		COMPLEX*16,dimension( nmax )	CT,
		DOUBLE PRECISION,dimension( nmax )	G
	)

Definition at line 656 of file zblat3.f.

subroutine ZCHK3	(	CHARACTER*6	SNAME,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX*16,dimension( nalf )	ALF,
		INTEGER	NMAX,
		COMPLEX*16,dimension( nmax, nmax )	A,
		COMPLEX*16,dimension( nmax*nmax )	AA,
		COMPLEX*16,dimension( nmax*nmax )	AS,
		COMPLEX*16,dimension( nmax, nmax )	B,
		COMPLEX*16,dimension( nmax*nmax )	BB,
		COMPLEX*16,dimension( nmax*nmax )	BS,
		COMPLEX*16,dimension( nmax )	CT,
		DOUBLE PRECISION,dimension( nmax )	G,
		COMPLEX*16,dimension( nmax, nmax )	C
	)

Definition at line 935 of file zblat3.f.

subroutine ZCHK4	(	CHARACTER*6	SNAME,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX*16,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX*16,dimension( nbet )	BET,
		INTEGER	NMAX,
		COMPLEX*16,dimension( nmax, nmax )	A,
		COMPLEX*16,dimension( nmax*nmax )	AA,
		COMPLEX*16,dimension( nmax*nmax )	AS,
		COMPLEX*16,dimension( nmax, nmax )	B,
		COMPLEX*16,dimension( nmax*nmax )	BB,
		COMPLEX*16,dimension( nmax*nmax )	BS,
		COMPLEX*16,dimension( nmax, nmax )	C,
		COMPLEX*16,dimension( nmax*nmax )	CC,
		COMPLEX*16,dimension( nmax*nmax )	CS,
		COMPLEX*16,dimension( nmax )	CT,
		DOUBLE PRECISION,dimension( nmax )	G
	)

Definition at line 1246 of file zblat3.f.

subroutine ZCHK5	(	CHARACTER*6	SNAME,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX*16,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX*16,dimension( nbet )	BET,
		INTEGER	NMAX,
		COMPLEX*16,dimension( 2*nmax*nmax )	AB,
		COMPLEX*16,dimension( nmax*nmax )	AA,
		COMPLEX*16,dimension( nmax*nmax )	AS,
		COMPLEX*16,dimension( nmax*nmax )	BB,
		COMPLEX*16,dimension( nmax*nmax )	BS,
		COMPLEX*16,dimension( nmax, nmax )	C,
		COMPLEX*16,dimension( nmax*nmax )	CC,
		COMPLEX*16,dimension( nmax*nmax )	CS,
		COMPLEX*16,dimension( nmax )	CT,
		DOUBLE PRECISION,dimension( nmax )	G,
		COMPLEX*16,dimension( 2*nmax )	W
	)

Definition at line 1578 of file zblat3.f.

subroutine ZCHKE	(	INTEGER	ISNUM,
		CHARACTER*6	SRNAMT,
		INTEGER	NOUT
	)

Definition at line 1952 of file zblat3.f.

subroutine ZMAKE	(	CHARACTER*2	TYPE,
		CHARACTER*1	UPLO,
		CHARACTER*1	DIAG,
		INTEGER	M,
		INTEGER	N,
		COMPLEX*16,dimension( nmax, * )	A,
		INTEGER	NMAX,
		COMPLEX*16,dimension( * )	AA,
		INTEGER	LDA,
		LOGICAL	RESET,
		COMPLEX*16	TRANSL
	)

Definition at line 2896 of file zblat3.f.

subroutine ZMMCH	(	CHARACTER*1	TRANSA,
		CHARACTER*1	TRANSB,
		INTEGER	M,
		INTEGER	N,
		INTEGER	KK,
		COMPLEX*16	ALPHA,
		COMPLEX*16,dimension( lda, * )	A,
		INTEGER	LDA,
		COMPLEX*16,dimension( ldb, * )	B,
		INTEGER	LDB,
		COMPLEX*16	BETA,
		COMPLEX*16,dimension( ldc, * )	C,
		INTEGER	LDC,
		COMPLEX*16,dimension( * )	CT,
		DOUBLE PRECISION,dimension( * )	G,
		COMPLEX*16,dimension( ldcc, * )	CC,
		INTEGER	LDCC,
		DOUBLE PRECISION	EPS,
		DOUBLE PRECISION	ERR,
		LOGICAL	FATAL,
		INTEGER	NOUT,
		LOGICAL	MV
	)

Definition at line 3025 of file zblat3.f.