dten3

La_constants is a module for the scaling constants for the compiled fortran single and double precisions

Part of la_constants(3).

Usage

Variables

character *1, parameter sprefix = 'S'

character *1, parameter cprefix = 'C'

character *1, parameter dprefix = 'D'

character *1, parameter zprefix = 'Z'

Detailed Description

LA_CONSTANTS is a module for the scaling constants for the compiled Fortran single and double precisions

Author

Edward Anderson, Lockheed Martin

Date

May 2016

Contributors:

Weslley Pereira, University of Colorado Denver, USA Nick Papior, Technical University of Denmark, DK

Further Details:

!>
!>  Anderson E. (2017)
!>  Algorithm 978: Safe Scaling in the Level 1 BLAS
!>  ACM Trans Math Softw 44:1--28
!>  https://doi.org/10.1145/3061665
!>
!>  Blue, James L. (1978)
!>  A Portable Fortran Program to Find the Euclidean Norm of a Vector
!>  ACM Trans Math Softw 4:15--23
!>  https://doi.org/10.1145/355769.355771
!>
!>

Variable Documentation

complex(sp), parameter la_constants::chalf = ( 0.5_sp, 0.0_sp )

Definition at line 57 of file la_constants.f90.

complex(sp), parameter la_constants::cone = ( 1.0_sp, 0.0_sp )

Definition at line 58 of file la_constants.f90.

character*1, parameter la_constants::cprefix = 'C'

Definition at line 60 of file la_constants.f90.

complex(sp), parameter la_constants::czero = ( 0.0_sp, 0.0_sp )

Definition at line 56 of file la_constants.f90.

real(dp), parameter la_constants::dbignum = dsafmax * dulp

Definition at line 114 of file la_constants.f90.

real(dp), parameter la_constants::deight = 8.0_dp

Definition at line 97 of file la_constants.f90.

real(dp), parameter la_constants::deps = dulp * 0.5_dp

Definition at line 107 of file la_constants.f90.

real(dp), parameter la_constants::dfour = 4.0_dp

Definition at line 96 of file la_constants.f90.

real(dp), parameter la_constants::dhalf = 0.5_dp

Definition at line 92 of file la_constants.f90.

real(dp), parameter la_constants::done = 1.0_dp

Definition at line 93 of file la_constants.f90.

integer, parameter la_constants::dp = kind(1.d0)

Definition at line 89 of file la_constants.f90.

character*1, parameter la_constants::dprefix = 'D'

Definition at line 102 of file la_constants.f90.

real(dp), parameter la_constants::drtmax = sqrt(dbignum)

Definition at line 116 of file la_constants.f90.

real(dp), parameter la_constants::drtmin = sqrt(dsmlnum)

Definition at line 115 of file la_constants.f90.

real(dp), parameter la_constants::dsafmax = done / dsafmin

Definition at line 112 of file la_constants.f90.

real(dp), parameter la_constants::dsafmin = real(radix(0._dp), dp)**max( minexponent(0._dp)-1, 1-maxexponent(0._dp) )

Definition at line 108 of file la_constants.f90.

real(dp), parameter la_constants::dsbig = real(radix(0._dp), dp)**( - ceiling( (maxexponent(0._dp) + digits(0._dp) - 1) * 0.5_dp))

Definition at line 128 of file la_constants.f90.

real(dp), parameter la_constants::dsmlnum = dsafmin / dulp

Definition at line 113 of file la_constants.f90.

real(dp), parameter la_constants::dssml = real(radix(0._dp), dp)**( - floor( (minexponent(0._dp) - digits(0._dp)) * 0.5_dp))

Definition at line 125 of file la_constants.f90.

real(dp), parameter la_constants::dtbig = real(radix(0._dp), dp)**floor( (maxexponent(0._dp) - digits(0._dp) + 1) * 0.5_dp)

Definition at line 121 of file la_constants.f90.

real(dp), parameter la_constants::dten = 10.0_dp

Definition at line 98 of file la_constants.f90.

real(dp), parameter la_constants::dthree = 3.0_dp

Definition at line 95 of file la_constants.f90.

real(dp), parameter la_constants::dtsml = real(radix(0._dp), dp)**ceiling( (minexponent(0._dp) - 1) * 0.5_dp)

Definition at line 119 of file la_constants.f90.

real(dp), parameter la_constants::dtwo = 2.0_dp

Definition at line 94 of file la_constants.f90.

real(dp), parameter la_constants::dulp = epsilon(0._dp)

Definition at line 106 of file la_constants.f90.

real(dp), parameter la_constants::dzero = 0.0_dp

Definition at line 91 of file la_constants.f90.

real(sp), parameter la_constants::sbignum = ssafmax * sulp

Definition at line 71 of file la_constants.f90.

real(sp), parameter la_constants::seight = 8.0_sp

Definition at line 54 of file la_constants.f90.

real(sp), parameter la_constants::seps = sulp * 0.5_sp

Definition at line 64 of file la_constants.f90.

real(sp), parameter la_constants::sfour = 4.0_sp

Definition at line 53 of file la_constants.f90.

real(sp), parameter la_constants::shalf = 0.5_sp

Definition at line 49 of file la_constants.f90.

real(sp), parameter la_constants::sone = 1.0_sp

Definition at line 50 of file la_constants.f90.

integer, parameter la_constants::sp = kind(1.e0)

Definition at line 46 of file la_constants.f90.

character*1, parameter la_constants::sprefix = 'S'

Definition at line 59 of file la_constants.f90.

real(sp), parameter la_constants::srtmax = sqrt(sbignum)

Definition at line 73 of file la_constants.f90.

real(sp), parameter la_constants::srtmin = sqrt(ssmlnum)

Definition at line 72 of file la_constants.f90.

real(sp), parameter la_constants::ssafmax = sone / ssafmin

Definition at line 69 of file la_constants.f90.

real(sp), parameter la_constants::ssafmin = real(radix(0._sp), sp)**max( minexponent(0._sp)-1, 1-maxexponent(0._sp) )

Definition at line 65 of file la_constants.f90.

real(sp), parameter la_constants::ssbig = real(radix(0._sp), sp)**( - ceiling( (maxexponent(0._sp) + digits(0._sp) - 1) * 0.5_sp))

Definition at line 85 of file la_constants.f90.

real(sp), parameter la_constants::ssmlnum = ssafmin / sulp

Definition at line 70 of file la_constants.f90.

real(sp), parameter la_constants::sssml = real(radix(0._sp), sp)**( - floor( (minexponent(0._sp) - digits(0._sp)) * 0.5_sp))

Definition at line 82 of file la_constants.f90.

real(sp), parameter la_constants::stbig = real(radix(0._sp), sp)**floor( (maxexponent(0._sp) - digits(0._sp) + 1) * 0.5_sp)

Definition at line 78 of file la_constants.f90.

real(sp), parameter la_constants::sten = 10.0_sp

Definition at line 55 of file la_constants.f90.

real(sp), parameter la_constants::sthree = 3.0_sp

Definition at line 52 of file la_constants.f90.

real(sp), parameter la_constants::stsml = real(radix(0._sp), sp)**ceiling( (minexponent(0._sp) - 1) * 0.5_sp)

Definition at line 76 of file la_constants.f90.

real(sp), parameter la_constants::stwo = 2.0_sp

Definition at line 51 of file la_constants.f90.

real(sp), parameter la_constants::sulp = epsilon(0._sp)

Definition at line 63 of file la_constants.f90.

real(sp), parameter la_constants::szero = 0.0_sp

Definition at line 48 of file la_constants.f90.

complex(dp), parameter la_constants::zhalf = ( 0.5_dp, 0.0_dp )

Definition at line 100 of file la_constants.f90.

complex(dp), parameter la_constants::zone = ( 1.0_dp, 0.0_dp )

Definition at line 101 of file la_constants.f90.

character*1, parameter la_constants::zprefix = 'Z'

Definition at line 103 of file la_constants.f90.

complex(dp), parameter la_constants::zzero = ( 0.0_dp, 0.0_dp )

Definition at line 99 of file la_constants.f90.