zblat1.f File Reference

Functions/Subroutines
program	zblat1
	ZBLAT1
subroutine	header
subroutine	check1 (sfac)
subroutine	check2 (sfac)
subroutine	stest (len, scomp, strue, ssize, sfac)
subroutine	stest1 (scomp1, strue1, ssize, sfac)
double precision function	sdiff (sa, sb)
subroutine	ctest (len, ccomp, ctrue, csize, sfac)
subroutine	itest1 (icomp, itrue)

Function/Subroutine Documentation

check1()

subroutine check1

(

double precision

sfac

)

check2()

subroutine check2

(

double precision

sfac

)

ctest()

subroutine ctest	(	integer	len,
		complex*16, dimension(len)	ccomp,
		complex*16, dimension(len)	ctrue,
		complex*16, dimension(len)	csize,
		double precision	sfac
	)

header()

subroutine header

itest1()

subroutine itest1	(	integer	icomp,
		integer	itrue
	)

sdiff()

double precision function sdiff	(	double precision	sa,
		double precision	sb
	)

stest()

subroutine stest	(	integer	len,
		double precision, dimension(len)	scomp,
		double precision, dimension(len)	strue,
		double precision, dimension(len)	ssize,
		double precision	sfac
	)

stest1()

subroutine stest1	(	double precision	scomp1,
		double precision	strue1,
		double precision, dimension(*)	ssize,
		double precision	sfac
	)

zblat1()

program zblat1

ZBLAT1

Purpose:

    Test program for the COMPLEX*16 Level 1 BLAS.

    Based upon the original BLAS test routine together with:
    F06GAF Example Program Text

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date

April 2012