.TH "SRC/la_constants.f90" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME SRC/la_constants.f90 .SH SYNOPSIS .br .PP .SS "Modules" .in +1c .ti -1c .RI "module \fBla_constants\fP" .br .RI "\fBLA_CONSTANTS\fP is a module for the scaling constants for the compiled Fortran single and double precisions " .in -1c .SS "Variables" .in +1c .ti -1c .RI "integer, parameter \fBla_constants::sp\fP = kind(1\&.e0)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::szero\fP = 0\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::shalf\fP = 0\&.5_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sone\fP = 1\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::stwo\fP = 2\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sthree\fP = 3\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sfour\fP = 4\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::seight\fP = 8\&.0_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sten\fP = 10\&.0_sp" .br .ti -1c .RI "complex(\fBsp\fP), parameter \fBla_constants::czero\fP = ( 0\&.0_sp, 0\&.0_sp )" .br .ti -1c .RI "complex(\fBsp\fP), parameter \fBla_constants::chalf\fP = ( 0\&.5_sp, 0\&.0_sp )" .br .ti -1c .RI "complex(\fBsp\fP), parameter \fBla_constants::cone\fP = ( 1\&.0_sp, 0\&.0_sp )" .br .ti -1c .RI "character *1, parameter \fBla_constants::sprefix\fP = 'S'" .br .ti -1c .RI "character *1, parameter \fBla_constants::cprefix\fP = 'C'" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sulp\fP = epsilon(0\&._sp)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::seps\fP = \fBsulp\fP * 0\&.5_sp" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::ssafmin\fP = real(radix(0\&._sp), \fBsp\fP)**max( minexponent(0\&._sp)\-1, 1\-maxexponent(0\&._sp) )" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::ssafmax\fP = \fBsone\fP / \fBssafmin\fP" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::ssmlnum\fP = \fBssafmin\fP / \fBsulp\fP" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sbignum\fP = \fBssafmax\fP * \fBsulp\fP" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::srtmin\fP = sqrt(\fBssmlnum\fP)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::srtmax\fP = sqrt(\fBsbignum\fP)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::stsml\fP = real(radix(0\&._sp), \fBsp\fP)**ceiling( (minexponent(0\&._sp) \- 1) * 0\&.5_sp)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::stbig\fP = real(radix(0\&._sp), \fBsp\fP)**floor( (maxexponent(0\&._sp) \- digits(0\&._sp) + 1) * 0\&.5_sp)" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::sssml\fP = real(radix(0\&._sp), \fBsp\fP)**( \- floor( (minexponent(0\&._sp) \- digits(0\&._sp)) * 0\&.5_sp))" .br .ti -1c .RI "real(\fBsp\fP), parameter \fBla_constants::ssbig\fP = real(radix(0\&._sp), \fBsp\fP)**( \- ceiling( (maxexponent(0\&._sp) + digits(0\&._sp) \- 1) * 0\&.5_sp))" .br .ti -1c .RI "integer, parameter \fBla_constants::dp\fP = kind(1\&.d0)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dzero\fP = 0\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dhalf\fP = 0\&.5_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::done\fP = 1\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dtwo\fP = 2\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dthree\fP = 3\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dfour\fP = 4\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::deight\fP = 8\&.0_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dten\fP = 10\&.0_dp" .br .ti -1c .RI "complex(\fBdp\fP), parameter \fBla_constants::zzero\fP = ( 0\&.0_dp, 0\&.0_dp )" .br .ti -1c .RI "complex(\fBdp\fP), parameter \fBla_constants::zhalf\fP = ( 0\&.5_dp, 0\&.0_dp )" .br .ti -1c .RI "complex(\fBdp\fP), parameter \fBla_constants::zone\fP = ( 1\&.0_dp, 0\&.0_dp )" .br .ti -1c .RI "character *1, parameter \fBla_constants::dprefix\fP = 'D'" .br .ti -1c .RI "character *1, parameter \fBla_constants::zprefix\fP = 'Z'" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dulp\fP = epsilon(0\&._dp)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::deps\fP = \fBdulp\fP * 0\&.5_dp" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dsafmin\fP = real(radix(0\&._dp), \fBdp\fP)**max( minexponent(0\&._dp)\-1, 1\-maxexponent(0\&._dp) )" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dsafmax\fP = \fBdone\fP / \fBdsafmin\fP" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dsmlnum\fP = \fBdsafmin\fP / \fBdulp\fP" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dbignum\fP = \fBdsafmax\fP * \fBdulp\fP" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::drtmin\fP = sqrt(\fBdsmlnum\fP)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::drtmax\fP = sqrt(\fBdbignum\fP)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dtsml\fP = real(radix(0\&._dp), \fBdp\fP)**ceiling( (minexponent(0\&._dp) \- 1) * 0\&.5_dp)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dtbig\fP = real(radix(0\&._dp), \fBdp\fP)**floor( (maxexponent(0\&._dp) \- digits(0\&._dp) + 1) * 0\&.5_dp)" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dssml\fP = real(radix(0\&._dp), \fBdp\fP)**( \- floor( (minexponent(0\&._dp) \- digits(0\&._dp)) * 0\&.5_dp))" .br .ti -1c .RI "real(\fBdp\fP), parameter \fBla_constants::dsbig\fP = real(radix(0\&._dp), \fBdp\fP)**( \- ceiling( (maxexponent(0\&._dp) + digits(0\&._dp) \- 1) * 0\&.5_dp))" .br .in -1c .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.