dblat1.f File Reference

Functions/Subroutines
program	dblat1
	DBLAT1
subroutine	header
subroutine	check0 (sfac)
subroutine	check1 (sfac)
subroutine	check2 (sfac)
subroutine	check3 (sfac)
subroutine	stest (len, scomp, strue, ssize, sfac)
subroutine	testdsdot (scomp, strue, ssize, sfac)
subroutine	stest1 (scomp1, strue1, ssize, sfac)
double precision function	sdiff (sa, sb)
subroutine	itest1 (icomp, itrue)

Function/Subroutine Documentation

check0()

subroutine check0

(

double precision

sfac

)

check1()

subroutine check1

(

double precision

sfac

)

check2()

subroutine check2

(

double precision

sfac

)

check3()

subroutine check3

(

double precision

sfac

)

dblat1()

program dblat1

DBLAT1

Purpose:

    Test program for the DOUBLE PRECISION Level 1 BLAS.

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

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Date

April 2012

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
	)

testdsdot()

subroutine testdsdot	(	real	scomp,
		real	strue,
		real	ssize,
		real	sfac
	)