BLAS/TESTING/cblat2.f File Reference

Go to the source code of this file.

Functions/Subroutines
program	CBLAT2
subroutine	CCHK1 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G)
subroutine	CCHK2 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G)
subroutine	CCHK3 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, XT, G, Z)
subroutine	CCHK4 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine	CCHK5 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine	CCHK6 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC, NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G, Z)
subroutine	CCHKE (ISNUM, SRNAMT, NOUT)
subroutine	CMAKE (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL, KU, RESET, TRANSL)
subroutine	CMVCH (TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y, INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV)
LOGICAL	LCE (RI, RJ, LR)
LOGICAL	LCERES (TYPE, UPLO, M, N, AA, AS, LDA)
COMPLEX	CBEG (RESET)
REAL	SDIFF (X, Y)
subroutine	CHKXER (SRNAMT, INFOT, NOUT, LERR, OK)
subroutine	XERBLA (SRNAME, INFO)

---

Function Documentation

COMPLEX CBEG

(

LOGICAL

RESET )

Definition at line 3096 of file cblat2.f.

program CBLAT2

(

)

Definition at line 1 of file cblat2.f.

subroutine CCHK1	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NKB,
		INTEGER,dimension( nkb )	KB,
		INTEGER	NALF,
		COMPLEX,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX,dimension( nbet )	BET,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	Y,
		COMPLEX,dimension( nmax*incmax )	YY,
		COMPLEX,dimension( nmax*incmax )	YS,
		COMPLEX,dimension( nmax )	YT,
		REAL,dimension( nmax )	G
	)

Definition at line 402 of file cblat2.f.

subroutine CCHK2	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NKB,
		INTEGER,dimension( nkb )	KB,
		INTEGER	NALF,
		COMPLEX,dimension( nalf )	ALF,
		INTEGER	NBET,
		COMPLEX,dimension( nbet )	BET,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	Y,
		COMPLEX,dimension( nmax*incmax )	YY,
		COMPLEX,dimension( nmax*incmax )	YS,
		COMPLEX,dimension( nmax )	YT,
		REAL,dimension( nmax )	G
	)

Definition at line 747 of file cblat2.f.

subroutine CCHK3	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NKB,
		INTEGER,dimension( nkb )	KB,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	XT,
		REAL,dimension( nmax )	G,
		COMPLEX,dimension( nmax )	Z
	)

Definition at line 1095 of file cblat2.f.

subroutine CCHK4	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX,dimension( nalf )	ALF,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	Y,
		COMPLEX,dimension( nmax*incmax )	YY,
		COMPLEX,dimension( nmax*incmax )	YS,
		COMPLEX,dimension( nmax )	YT,
		REAL,dimension( nmax )	G,
		COMPLEX,dimension( nmax )	Z
	)

Definition at line 1456 of file cblat2.f.

subroutine CCHK5	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX,dimension( nalf )	ALF,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	Y,
		COMPLEX,dimension( nmax*incmax )	YY,
		COMPLEX,dimension( nmax*incmax )	YS,
		COMPLEX,dimension( nmax )	YT,
		REAL,dimension( nmax )	G,
		COMPLEX,dimension( nmax )	Z
	)

Definition at line 1733 of file cblat2.f.

subroutine CCHK6	(	CHARACTER*6	SNAME,
		REAL	EPS,
		REAL	THRESH,
		INTEGER	NOUT,
		INTEGER	NTRA,
		LOGICAL	TRACE,
		LOGICAL	REWI,
		LOGICAL	FATAL,
		INTEGER	NIDIM,
		INTEGER,dimension( nidim )	IDIM,
		INTEGER	NALF,
		COMPLEX,dimension( nalf )	ALF,
		INTEGER	NINC,
		INTEGER,dimension( ninc )	INC,
		INTEGER	NMAX,
		INTEGER	INCMAX,
		COMPLEX,dimension( nmax, nmax )	A,
		COMPLEX,dimension( nmax*nmax )	AA,
		COMPLEX,dimension( nmax*nmax )	AS,
		COMPLEX,dimension( nmax )	X,
		COMPLEX,dimension( nmax*incmax )	XX,
		COMPLEX,dimension( nmax*incmax )	XS,
		COMPLEX,dimension( nmax )	Y,
		COMPLEX,dimension( nmax*incmax )	YY,
		COMPLEX,dimension( nmax*incmax )	YS,
		COMPLEX,dimension( nmax )	YT,
		REAL,dimension( nmax )	G,
		COMPLEX,dimension( nmax, 2 )	Z
	)

Definition at line 2017 of file cblat2.f.

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

Definition at line 2339 of file cblat2.f.

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

Definition at line 3164 of file cblat2.f.

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

Definition at line 2682 of file cblat2.f.

subroutine CMVCH	(	CHARACTER*1	TRANS,
		INTEGER	M,
		INTEGER	N,
		COMPLEX	ALPHA,
		COMPLEX,dimension( nmax, * )	A,
		INTEGER	NMAX,
		COMPLEX,dimension( * )	X,
		INTEGER	INCX,
		COMPLEX	BETA,
		COMPLEX,dimension( * )	Y,
		INTEGER	INCY,
		COMPLEX,dimension( * )	YT,
		REAL,dimension( * )	G,
		COMPLEX,dimension( * )	YY,
		REAL	EPS,
		REAL	ERR,
		LOGICAL	FATAL,
		INTEGER	NOUT,
		LOGICAL	MV
	)

Definition at line 2874 of file cblat2.f.

LOGICAL LCE	(	COMPLEX,dimension( * )	RI,
		COMPLEX,dimension( * )	RJ,
		INTEGER	LR
	)

Definition at line 3006 of file cblat2.f.

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

Definition at line 3036 of file cblat2.f.

REAL SDIFF	(	REAL	X,
		REAL	Y
	)

Definition at line 3148 of file cblat2.f.

subroutine XERBLA	(	CHARACTER*6	SRNAME,
		INTEGER	INFO
	)

Definition at line 3192 of file cblat2.f.