sblat1.f File Reference

Functions/Subroutines
program	sblat1
	SBLAT1
subroutine	header
subroutine	check0 (sfac)
subroutine	check1 (sfac)
subroutine	check2 (sfac)
subroutine	check3 (sfac)
subroutine	stest (len, scomp, strue, ssize, sfac)
subroutine	stest1 (scomp1, strue1, ssize, sfac)
real function	sdiff (sa, sb)
subroutine	itest1 (icomp, itrue)

Function/Subroutine Documentation

check0()

subroutine check0

(

real

sfac

)

check1()

subroutine check1

(

real

sfac

)

check2()

subroutine check2

(

real

sfac

)

check3()

subroutine check3

(

real

sfac

)

header()

subroutine header

itest1()

subroutine itest1	(	integer	icomp,
		integer	itrue
	)

sblat1()

program sblat1

SBLAT1

Purpose:

    Test program for the REAL 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

sdiff()

real function sdiff	(	real	sa,
		real	sb
	)

stest()

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

stest1()

subroutine stest1	(	real	scomp1,
		real	strue1,
		real, dimension(*)	ssize,
		real	sfac
	)