BLAS/TESTING/sblat3.f File Reference

Go to the source code of this file.

Functions/Subroutines
program	SBLAT3
subroutine	SCHK1 (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	SCHK2 (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	SCHK3 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, A, AA, AS, B, BB, BS, CT, G, C)
subroutine	SCHK4 (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	SCHK5 (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	SCHKE (ISNUM, SRNAMT, NOUT)
subroutine	SMAKE (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET, TRANSL)
subroutine	SMMCH (TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, BETA, C, LDC, CT, G, CC, LDCC, EPS, ERR, FATAL, NOUT, MV)
LOGICAL	LSE (RI, RJ, LR)
LOGICAL	LSERES (TYPE, UPLO, M, N, AA, AS, LDA)
REAL	SBEG (RESET)
REAL	SDIFF (X, Y)
subroutine	CHKXER (SRNAMT, INFOT, NOUT, LERR, OK)
subroutine	XERBLA (SRNAME, INFO)

---

Function Documentation

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

Definition at line 2754 of file sblat3.f.

LOGICAL LSE	(	REAL,dimension( * )	RI,
		REAL,dimension( * )	RJ,
		INTEGER	LR
	)

Definition at line 2595 of file sblat3.f.

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

Definition at line 2627 of file sblat3.f.

REAL SBEG

(

LOGICAL

RESET )

Definition at line 2689 of file sblat3.f.

program SBLAT3

(

)

Definition at line 1 of file sblat3.f.

subroutine SCHK1	(	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,
		REAL,dimension( nalf )	ALF,
		INTEGER	NBET,
		REAL,dimension( nbet )	BET,
		INTEGER	NMAX,
		REAL,dimension( nmax, nmax )	A,
		REAL,dimension( nmax*nmax )	AA,
		REAL,dimension( nmax*nmax )	AS,
		REAL,dimension( nmax, nmax )	B,
		REAL,dimension( nmax*nmax )	BB,
		REAL,dimension( nmax*nmax )	BS,
		REAL,dimension( nmax, nmax )	C,
		REAL,dimension( nmax*nmax )	CC,
		REAL,dimension( nmax*nmax )	CS,
		REAL,dimension( nmax )	CT,
		REAL,dimension( nmax )	G
	)

Definition at line 360 of file sblat3.f.

subroutine SCHK2	(	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,
		REAL,dimension( nalf )	ALF,
		INTEGER	NBET,
		REAL,dimension( nbet )	BET,
		INTEGER	NMAX,
		REAL,dimension( nmax, nmax )	A,
		REAL,dimension( nmax*nmax )	AA,
		REAL,dimension( nmax*nmax )	AS,
		REAL,dimension( nmax, nmax )	B,
		REAL,dimension( nmax*nmax )	BB,
		REAL,dimension( nmax*nmax )	BS,
		REAL,dimension( nmax, nmax )	C,
		REAL,dimension( nmax*nmax )	CC,
		REAL,dimension( nmax*nmax )	CS,
		REAL,dimension( nmax )	CT,
		REAL,dimension( nmax )	G
	)

Definition at line 641 of file sblat3.f.

subroutine SCHK3	(	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,
		REAL,dimension( nalf )	ALF,
		INTEGER	NMAX,
		REAL,dimension( nmax, nmax )	A,
		REAL,dimension( nmax*nmax )	AA,
		REAL,dimension( nmax*nmax )	AS,
		REAL,dimension( nmax, nmax )	B,
		REAL,dimension( nmax*nmax )	BB,
		REAL,dimension( nmax*nmax )	BS,
		REAL,dimension( nmax )	CT,
		REAL,dimension( nmax )	G,
		REAL,dimension( nmax, nmax )	C
	)

Definition at line 911 of file sblat3.f.

subroutine SCHK4	(	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,
		REAL,dimension( nalf )	ALF,
		INTEGER	NBET,
		REAL,dimension( nbet )	BET,
		INTEGER	NMAX,
		REAL,dimension( nmax, nmax )	A,
		REAL,dimension( nmax*nmax )	AA,
		REAL,dimension( nmax*nmax )	AS,
		REAL,dimension( nmax, nmax )	B,
		REAL,dimension( nmax*nmax )	BB,
		REAL,dimension( nmax*nmax )	BS,
		REAL,dimension( nmax, nmax )	C,
		REAL,dimension( nmax*nmax )	CC,
		REAL,dimension( nmax*nmax )	CS,
		REAL,dimension( nmax )	CT,
		REAL,dimension( nmax )	G
	)

Definition at line 1216 of file sblat3.f.

subroutine SCHK5	(	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,
		REAL,dimension( nalf )	ALF,
		INTEGER	NBET,
		REAL,dimension( nbet )	BET,
		INTEGER	NMAX,
		REAL,dimension( 2*nmax*nmax )	AB,
		REAL,dimension( nmax*nmax )	AA,
		REAL,dimension( nmax*nmax )	AS,
		REAL,dimension( nmax*nmax )	BB,
		REAL,dimension( nmax*nmax )	BS,
		REAL,dimension( nmax, nmax )	C,
		REAL,dimension( nmax*nmax )	CC,
		REAL,dimension( nmax*nmax )	CS,
		REAL,dimension( nmax )	CT,
		REAL,dimension( nmax )	G,
		REAL,dimension( 2*nmax )	W
	)

Definition at line 1491 of file sblat3.f.

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

Definition at line 1805 of file sblat3.f.

REAL SDIFF	(	REAL	X,
		REAL	Y
	)

Definition at line 2735 of file sblat3.f.

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

Definition at line 2360 of file sblat3.f.

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

Definition at line 2473 of file sblat3.f.

subroutine XERBLA	(	CHARACTER*6	SRNAME,
		INTEGER	INFO
	)

Definition at line 2784 of file sblat3.f.