la_constants_qp Module Reference

128-bit BLAS/LAPACK constants More...

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

Detailed Description

128-bit BLAS/LAPACK constants

Variable Documentation

bignum

real(qp), parameter, public la_constants_qp::bignum = safmax*ulp

chalf

complex(qp), parameter, public la_constants_qp::chalf = (0.5_qp, 0.0_qp)

cnegone

complex(qp), parameter, public la_constants_qp::cnegone = (-1.0_qp, 0.0_qp)

cone

complex(qp), parameter, public la_constants_qp::cone = (1.0_qp, 0.0_qp)

czero

complex(qp), parameter, public la_constants_qp::czero = (0.0_qp, 0.0_qp)

eight

real(qp), parameter, public la_constants_qp::eight = 8.00_qp

eps

real(qp), parameter, public la_constants_qp::eps = ulp*half

four

real(qp), parameter, public la_constants_qp::four = 4.00_qp

half

real(qp), parameter, public la_constants_qp::half = 0.50_qp

maxexp

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

minexp

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

negone

real(qp), parameter, public la_constants_qp::negone = -1.00_qp

one

real(qp), parameter, public la_constants_qp::one = 1.00_qp

rradix

real(qp), parameter, public la_constants_qp::rradix = real(radix(zero), qp)

rtmax

real(qp), parameter, public la_constants_qp::rtmax = sqrt(bignum)

rtmin

real(qp), parameter, public la_constants_qp::rtmin = sqrt(smlnum)

safmax

real(qp), parameter, public la_constants_qp::safmax = one/safmin

safmin

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

sbig

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

smlnum

real(qp), parameter, public la_constants_qp::smlnum = safmin/ulp

ssml

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

tbig

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

ten

real(qp), parameter, public la_constants_qp::ten = 10.00_qp

three

real(qp), parameter, public la_constants_qp::three = 3.00_qp

tsml

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

two

real(qp), parameter, public la_constants_qp::two = 2.00_qp

ulp

real(qp), parameter, public la_constants_qp::ulp = epsilon(zero)

zero

real(qp), parameter, public la_constants_qp::zero = 0.00_qp