la_constants_dp Module Reference

64-bit BLAS/LAPACK constants More...

Variables
real(dp), parameter, public	negone = -1.00_dp
real(dp), parameter, public	zero = 0.00_dp
real(dp), parameter, public	half = 0.50_dp
real(dp), parameter, public	one = 1.00_dp
real(dp), parameter, public	two = 2.00_dp
real(dp), parameter, public	three = 3.00_dp
real(dp), parameter, public	four = 4.00_dp
real(dp), parameter, public	eight = 8.00_dp
real(dp), parameter, public	ten = 10.00_dp
complex(dp), parameter, public	czero = (0.0_dp, 0.0_dp)
complex(dp), parameter, public	chalf = (0.5_dp, 0.0_dp)
complex(dp), parameter, public	cone = (1.0_dp, 0.0_dp)
complex(dp), parameter, public	cnegone = (-1.0_dp, 0.0_dp)
integer, parameter, public	maxexp = maxexponent(zero)
integer, parameter, public	minexp = minexponent(zero)
real(dp), parameter, public	rradix = real(radix(zero), dp)
real(dp), parameter, public	ulp = epsilon(zero)
real(dp), parameter, public	eps = ulp*half
real(dp), parameter, public	safmin = rradix**max(minexp - 1, 1 - maxexp)
real(dp), parameter, public	safmax = one/safmin
real(dp), parameter, public	smlnum = safmin/ulp
real(dp), parameter, public	bignum = safmax*ulp
real(dp), parameter, public	rtmin = sqrt(smlnum)
real(dp), parameter, public	rtmax = sqrt(bignum)
real(dp), parameter, public	tsml = rradix**ceiling((minexp - 1)*half)
real(dp), parameter, public	tbig = rradix**floor((maxexp - digits(zero) + 1)*half)
real(dp), parameter, public	ssml = rradix**(-floor((minexp - digits(zero))*half))
real(dp), parameter, public	sbig = rradix**(-ceiling((maxexp + digits(zero) - 1)*half))

Detailed Description

64-bit BLAS/LAPACK constants

Variable Documentation

bignum

real(dp), parameter, public la_constants_dp::bignum = safmax*ulp

chalf

complex(dp), parameter, public la_constants_dp::chalf = (0.5_dp, 0.0_dp)

cnegone

complex(dp), parameter, public la_constants_dp::cnegone = (-1.0_dp, 0.0_dp)

cone

complex(dp), parameter, public la_constants_dp::cone = (1.0_dp, 0.0_dp)

czero

complex(dp), parameter, public la_constants_dp::czero = (0.0_dp, 0.0_dp)

eight

real(dp), parameter, public la_constants_dp::eight = 8.00_dp

eps

real(dp), parameter, public la_constants_dp::eps = ulp*half

four

real(dp), parameter, public la_constants_dp::four = 4.00_dp

half

real(dp), parameter, public la_constants_dp::half = 0.50_dp

maxexp

integer, parameter, public la_constants_dp::maxexp = maxexponent(zero)

minexp

integer, parameter, public la_constants_dp::minexp = minexponent(zero)

negone

real(dp), parameter, public la_constants_dp::negone = -1.00_dp

one

real(dp), parameter, public la_constants_dp::one = 1.00_dp

rradix

real(dp), parameter, public la_constants_dp::rradix = real(radix(zero), dp)

rtmax

real(dp), parameter, public la_constants_dp::rtmax = sqrt(bignum)

rtmin

real(dp), parameter, public la_constants_dp::rtmin = sqrt(smlnum)

safmax

real(dp), parameter, public la_constants_dp::safmax = one/safmin

safmin

real(dp), parameter, public la_constants_dp::safmin = rradix**max(minexp - 1, 1 - maxexp)

sbig

real(dp), parameter, public la_constants_dp::sbig = rradix**(-ceiling((maxexp + digits(zero) - 1)*half))

smlnum

real(dp), parameter, public la_constants_dp::smlnum = safmin/ulp

ssml

real(dp), parameter, public la_constants_dp::ssml = rradix**(-floor((minexp - digits(zero))*half))

tbig

real(dp), parameter, public la_constants_dp::tbig = rradix**floor((maxexp - digits(zero) + 1)*half)

ten

real(dp), parameter, public la_constants_dp::ten = 10.00_dp

three

real(dp), parameter, public la_constants_dp::three = 3.00_dp

tsml

real(dp), parameter, public la_constants_dp::tsml = rradix**ceiling((minexp - 1)*half)

two

real(dp), parameter, public la_constants_dp::two = 2.00_dp

ulp

real(dp), parameter, public la_constants_dp::ulp = epsilon(zero)

zero

real(dp), parameter, public la_constants_dp::zero = 0.00_dp