Portable kind-parameters module. More...

Collaboration diagram for IR_Precision:

logical, public	ir_precision::ir_initialized = .false.
	Flag for chcecking the initialization of some variables that must be initialized by IR_Init. More...

integer, parameter, public	ir_precision::endianl = 1
	Little endian parameter. More...

integer, parameter, public	ir_precision::endianb = 0
	Big endian parameter. More...

integer, public	ir_precision::endian = endianL
	Bit ordering: Little endian (endianL), or Big endian (endianB). More...

integer, parameter, public	ir_precision::r16p = selected_real_kind(15, 307)
	Defined as R8P; 64 bits. More...

integer, parameter, public	ir_precision::r8p = selected_real_kind(15, 307)
	15 digits, range $[10^{-307} , 10^{+307} - 1]$ ; 64 bits. More...

integer, parameter, public	ir_precision::r4p = selected_real_kind(6, 37)
	6 digits, range $[10^{-37} , 10^{+37} - 1]$ ; 32 bits. More...

integer, parameter, public	ir_precision::r_p = R8P
	Default real precision. More...

integer, parameter, public	ir_precision::i8p = selected_int_kind(18)
	Range $[-2^{63},+2^{63} - 1]$ , 19 digits plus sign; 64 bits. More...

integer, parameter, public	ir_precision::i4p = selected_int_kind(9)
	Range $[-2^{31},+2^{31} - 1]$ , 10 digits plus sign; 32 bits. More...

integer, parameter, public	ir_precision::i2p = selected_int_kind(4)
	Range $[-2^{15},+2^{15} - 1]$ , 5 digits plus sign; 16 bits. More...

integer, parameter, public	ir_precision::i1p = selected_int_kind(2)
	Range $[-2^{7} ,+2^{7} - 1]$ , 3 digits plus sign; 8 bits. More...

integer, parameter, public	ir_precision::i_p = I4P
	Default integer precision. More...

character(10), parameter, public	ir_precision::fr16p = '(E42.33E4)'
	Output format for kind=R16P variable. More...

character(10), parameter, public	ir_precision::fr8p = '(E23.15E3)'
	Output format for kind=R8P variable. More...

character(9), parameter, public	ir_precision::fr4p = '(E13.6E2)'
	Output format for kind=R4P variable. More...

character(10), parameter, public	ir_precision::fr_p = FR8P
	Output format for kind=R_P variable. More...

integer, parameter, public	ir_precision::dr16p = 42
	Number of digits of output format FR16P. More...

integer, parameter, public	ir_precision::dr8p = 23
	Number of digits of output format FR8P. More...

integer, parameter, public	ir_precision::dr4p = 13
	Number of digits of output format FR4P. More...

integer, parameter, public	ir_precision::dr_p = DR8P
	Number of digits of output format FR_P. More...

character(5), parameter, public	ir_precision::fi8p = '(I20)'
	Output format for kind=I8P variable. More...

character(5), parameter, public	ir_precision::fi4p = '(I11)'
	Output format for kind=I4P variable. More...

character(4), parameter, public	ir_precision::fi2p = '(I6)'
	Output format for kind=I2P variable. More...

character(4), parameter, public	ir_precision::fi1p = '(I4)'
	Output format for kind=I1P variable. More...

character(5), parameter, public	ir_precision::fi_p = FI4P
	Output format for kind=I_P variable. More...

integer, parameter, public	ir_precision::di8p = 20
	Number of digits of output format I8P. More...

integer, parameter, public	ir_precision::di4p = 11
	Number of digits of output format I4P. More...

integer, parameter, public	ir_precision::di2p = 6
	Number of digits of output format I2P. More...

integer, parameter, public	ir_precision::di1p = 4
	Number of digits of output format I1P. More...

integer, parameter, public	ir_precision::di_p = DI4P
	Number of digits of output format I_P. More...

integer, parameter, public	ir_precision::nrknd =4
	Number of defined real kinds. More...

integer, dimension(1:nrknd), parameter, public	ir_precision::rpl =[R16P,R8P,R4P,R_P]
	List of defined real kinds. More...

character(10), dimension(1:nrknd), parameter, public	ir_precision::frl =[FR16P,FR8P,FR4P//' ',FR_P]
	List of defined real kinds output format. More...

integer, parameter, public	ir_precision::niknd =5
	Number of defined integer kinds. More...

integer, dimension(1:niknd), parameter, public	ir_precision::ril =[I8P,I4P,I2P,I1P,I_P]
	List of defined integer kinds. More...

character(5), dimension(1:niknd), parameter, public	ir_precision::fil =[FI8P,FI4P,FI2P//' ',FI1P//' ',FI_P]
	List of defined integer kinds output format. More...

real(r16p), parameter, public	ir_precision::minr16p = -huge(1._R16P)

real(r16p), parameter, public	ir_precision::maxr16p = huge(1._R16P)
	Min and max values of kind=R16P variable. More...

real(r8p), parameter, public	ir_precision::minr8p = -huge(1._R8P )

real(r8p), parameter, public	ir_precision::maxr8p = huge(1._R8P )
	Min and max values of kind=R8P variable. More...

real(r4p), parameter, public	ir_precision::minr4p = -huge(1._R4P )

real(r4p), parameter, public	ir_precision::maxr4p = huge(1._R4P )
	Min and max values of kind=R4P variable. More...

real(r_p), parameter, public	ir_precision::minr_p = MinR8P

real(r_p), parameter, public	ir_precision::maxr_p = MaxR8P
	Min and max values of kind=R_P variable. More...

integer(i2p), public	ir_precision::bir16p

integer(i2p), public	ir_precision::byr16p
	Number of bits/bytes of kind=R16P variable. More...

integer(i1p), public	ir_precision::bir8p

integer(i1p), public	ir_precision::byr8p
	Number of bits/bytes of kind=R8P variable. More...

integer(i1p), public	ir_precision::bir4p

integer(i1p), public	ir_precision::byr4p
	Number of bits/bytes of kind=R4P variable. More...

integer(i1p), public	ir_precision::bir_p

integer(i1p), public	ir_precision::byr_p
	Number of bits/bytes of kind=R_P variable. More...

real(r16p), parameter, public	ir_precision::smallr16p = tiny(1._R16P)
	Smallest representable value of kind=R16P variable. More...

real(r8p), parameter, public	ir_precision::smallr8p = tiny(1._R8P )
	Smallest representable value of kind=R8P variable. More...

real(r4p), parameter, public	ir_precision::smallr4p = tiny(1._R4P )
	Smallest representable value of kind=R4P variable. More...

real(r_p), parameter, public	ir_precision::smallr_p = smallR8P
	Smallest representable value of kind=R_P variable. More...

integer(i8p), parameter, public	ir_precision::mini8p = -huge(1_I8P)

integer(i8p), parameter, public	ir_precision::maxi8p = huge(1_I8P)
	Min and max values of kind=I8P variable. More...

integer(i4p), parameter, public	ir_precision::mini4p = -huge(1_I4P)

integer(i4p), parameter, public	ir_precision::maxi4p = huge(1_I4P)
	Min and max values of kind=I4P variable. More...

integer(i2p), parameter, public	ir_precision::mini2p = -huge(1_I2P)

integer(i2p), parameter, public	ir_precision::maxi2p = huge(1_I2P)
	Min and max values of kind=I2P variable. More...

integer(i1p), parameter, public	ir_precision::mini1p = -huge(1_I1P)

integer(i1p), parameter, public	ir_precision::maxi1p = huge(1_I1P)
	Min and max values of kind=I1P variable. More...

integer(i_p), parameter, public	ir_precision::mini_p = MinI4P

integer(i_p), parameter, public	ir_precision::maxi_p = MaxI4P
	Min and max values of kind=I_P variable. More...

integer(i8p), parameter, public	ir_precision::bii8p = bit_size(MaxI8P)

integer(i8p), parameter, public	ir_precision::byi8p = bit_size(MaxI8P)/8_I8P
	Number of bits/bytes of kind=I8P variable. More...

integer(i4p), parameter, public	ir_precision::bii4p = bit_size(MaxI4P)

integer(i4p), parameter, public	ir_precision::byi4p = bit_size(MaxI4P)/8_I4P
	Number of bits/bytes of kind=I4P variable. More...

integer(i2p), parameter, public	ir_precision::bii2p = bit_size(MaxI2P)

integer(i2p), parameter, public	ir_precision::byi2p = bit_size(MaxI2P)/8_I2P
	Number of bits/bytes of kind=I2P variable. More...

integer(i1p), parameter, public	ir_precision::bii1p = bit_size(MaxI1P)

integer(i1p), parameter, public	ir_precision::byi1p = bit_size(MaxI1P)/8_I1P
	Number of bits/bytes of kind=I1P variable. More...

integer(i_p), parameter, public	ir_precision::bii_p = bit_size(MaxI_P)

integer(i_p), parameter, public	ir_precision::byi_p = bit_size(MaxI_P)/8_I_P
	Number of bits/bytes of kind=I_P variable. More...

real(r16p), parameter, public	ir_precision::zeror16 = nearest(1._R16P, 1._R16P) - nearest(1._R16P, -1._R16P)
	Smallest representable difference of kind=R16P variable. More...

real(r8p), parameter, public	ir_precision::zeror8 = nearest(1._R8P, 1._R8P) - nearest(1._R8P, -1._R8P)
	Smallest representable difference of kind=R8P variable. More...

real(r4p), parameter, public	ir_precision::zeror4 = nearest(1._R4P, 1._R4P) - nearest(1._R4P, -1._R4P)
	Smallest representable difference of kind=R4P variable. More...

real(r_p), parameter, public	ir_precision::zero = ZeroR8
	Smallest representable difference of kind=R_P variable. More...

character(8), parameter	ir_precision::fi8pzp = '(I20.19)'
	Output format with zero prefixing for kind=I8P variable. More...

character(8), parameter	ir_precision::fi4pzp = '(I11.10)'
	Output format with zero prefixing for kind=I4P variable. More...

character(6), parameter	ir_precision::fi2pzp = '(I6.5)'
	Output format with zero prefixing for kind=I2P variable. More...

character(6), parameter	ir_precision::fi1pzp = '(I4.3)'
	Output format with zero prefixing for kind=I1P variable. More...

character(8), parameter	ir_precision::fi_pzp = FI4PZP
	Output format with zero prefixing for kind=I_P variable. More...

Detailed Description

Portable kind-parameters module.

Variable Documentation

logical, public ir_precision::ir_initialized = .false.

Flag for chcecking the initialization of some variables that must be initialized by IR_Init.

Definition at line 140 of file IR_Precision.f90.

integer, parameter, public ir_precision::endianl = 1

Little endian parameter.

Definition at line 142 of file IR_Precision.f90.

integer, parameter, public ir_precision::endianb = 0

Big endian parameter.

Definition at line 143 of file IR_Precision.f90.

integer, public ir_precision::endian = endianL

Bit ordering: Little endian (endianL), or Big endian (endianB).

Definition at line 144 of file IR_Precision.f90.

integer, parameter, public ir_precision::r16p = selected_real_kind(15, 307)

Defined as R8P; 64 bits.

Definition at line 151 of file IR_Precision.f90.

integer, parameter, public ir_precision::r8p = selected_real_kind(15, 307)

15 digits, range $[10^{-307} , 10^{+307} - 1]$ ; 64 bits.

Definition at line 153 of file IR_Precision.f90.

integer, parameter, public ir_precision::r4p = selected_real_kind(6, 37)

6 digits, range $[10^{-37} , 10^{+37} - 1]$ ; 32 bits.

Definition at line 154 of file IR_Precision.f90.

integer, parameter, public ir_precision::r_p = R8P

Default real precision.

Definition at line 155 of file IR_Precision.f90.

integer, parameter, public ir_precision::i8p = selected_int_kind(18)

Range $[-2^{63},+2^{63} - 1]$ , 19 digits plus sign; 64 bits.

Definition at line 157 of file IR_Precision.f90.

integer, parameter, public ir_precision::i4p = selected_int_kind(9)

Range $[-2^{31},+2^{31} - 1]$ , 10 digits plus sign; 32 bits.

Definition at line 158 of file IR_Precision.f90.

integer, parameter, public ir_precision::i2p = selected_int_kind(4)

Range $[-2^{15},+2^{15} - 1]$ , 5 digits plus sign; 16 bits.

Definition at line 159 of file IR_Precision.f90.

integer, parameter, public ir_precision::i1p = selected_int_kind(2)

Range $[-2^{7} ,+2^{7} - 1]$ , 3 digits plus sign; 8 bits.

Definition at line 160 of file IR_Precision.f90.

integer, parameter, public ir_precision::i_p = I4P

Default integer precision.

Definition at line 161 of file IR_Precision.f90.

character(10), parameter, public ir_precision::fr16p = '(E42.33E4)'

Output format for kind=R16P variable.

Definition at line 165 of file IR_Precision.f90.

character(10), parameter, public ir_precision::fr8p = '(E23.15E3)'

Output format for kind=R8P variable.

Definition at line 166 of file IR_Precision.f90.

character(9), parameter, public ir_precision::fr4p = '(E13.6E2)'

Output format for kind=R4P variable.

Definition at line 167 of file IR_Precision.f90.

character(10), parameter, public ir_precision::fr_p = FR8P

Output format for kind=R_P variable.

Definition at line 168 of file IR_Precision.f90.

integer, parameter, public ir_precision::dr16p = 42

Number of digits of output format FR16P.

Definition at line 170 of file IR_Precision.f90.

integer, parameter, public ir_precision::dr8p = 23

Number of digits of output format FR8P.

Definition at line 171 of file IR_Precision.f90.

integer, parameter, public ir_precision::dr4p = 13

Number of digits of output format FR4P.

Definition at line 172 of file IR_Precision.f90.

integer, parameter, public ir_precision::dr_p = DR8P

Number of digits of output format FR_P.

Definition at line 173 of file IR_Precision.f90.

character(5), parameter, public ir_precision::fi8p = '(I20)'

Output format for kind=I8P variable.

Definition at line 175 of file IR_Precision.f90.

character(5), parameter, public ir_precision::fi4p = '(I11)'

Output format for kind=I4P variable.

Definition at line 177 of file IR_Precision.f90.

character(4), parameter, public ir_precision::fi2p = '(I6)'

Output format for kind=I2P variable.

Definition at line 179 of file IR_Precision.f90.

character(4), parameter, public ir_precision::fi1p = '(I4)'

Output format for kind=I1P variable.

Definition at line 181 of file IR_Precision.f90.

character(5), parameter, public ir_precision::fi_p = FI4P

Output format for kind=I_P variable.

Definition at line 183 of file IR_Precision.f90.

integer, parameter, public ir_precision::di8p = 20

Number of digits of output format I8P.

Definition at line 186 of file IR_Precision.f90.

integer, parameter, public ir_precision::di4p = 11

Number of digits of output format I4P.

Definition at line 187 of file IR_Precision.f90.

integer, parameter, public ir_precision::di2p = 6

Number of digits of output format I2P.

Definition at line 188 of file IR_Precision.f90.

integer, parameter, public ir_precision::di1p = 4

Number of digits of output format I1P.

Definition at line 189 of file IR_Precision.f90.

integer, parameter, public ir_precision::di_p = DI4P

Number of digits of output format I_P.

Definition at line 190 of file IR_Precision.f90.

integer, parameter, public ir_precision::nrknd =4

Number of defined real kinds.

Definition at line 192 of file IR_Precision.f90.

integer, dimension(1:nrknd), parameter, public ir_precision::rpl =[R16P,R8P,R4P,R_P]

List of defined real kinds.

Definition at line 193 of file IR_Precision.f90.

character(10), dimension(1:nrknd), parameter, public ir_precision::frl =[FR16P,FR8P,FR4P//' ',FR_P]

List of defined real kinds output format.

Definition at line 194 of file IR_Precision.f90.

integer, parameter, public ir_precision::niknd =5

Number of defined integer kinds.

Definition at line 195 of file IR_Precision.f90.

integer, dimension(1:niknd), parameter, public ir_precision::ril =[I8P,I4P,I2P,I1P,I_P]

List of defined integer kinds.

Definition at line 196 of file IR_Precision.f90.

character(5), dimension(1:niknd), parameter, public ir_precision::fil =[FI8P,FI4P,FI2P//' ',FI1P//' ',FI_P]

List of defined integer kinds output format.

Definition at line 197 of file IR_Precision.f90.

real(r16p), parameter, public ir_precision::minr16p = -huge(1._R16P)

Definition at line 201 of file IR_Precision.f90.

real(r16p), parameter, public ir_precision::maxr16p = huge(1._R16P)

Min and max values of kind=R16P variable.

Definition at line 201 of file IR_Precision.f90.

real(r8p), parameter, public ir_precision::minr8p = -huge(1._R8P )

Definition at line 202 of file IR_Precision.f90.

real(r8p), parameter, public ir_precision::maxr8p = huge(1._R8P )

Min and max values of kind=R8P variable.

Definition at line 202 of file IR_Precision.f90.

Referenced by dcs_simulate().

real(r4p), parameter, public ir_precision::minr4p = -huge(1._R4P )

Definition at line 203 of file IR_Precision.f90.

real(r4p), parameter, public ir_precision::maxr4p = huge(1._R4P )

Min and max values of kind=R4P variable.

Definition at line 203 of file IR_Precision.f90.

real(r_p), parameter, public ir_precision::minr_p = MinR8P

Definition at line 204 of file IR_Precision.f90.

real(r_p), parameter, public ir_precision::maxr_p = MaxR8P

Min and max values of kind=R_P variable.

Definition at line 204 of file IR_Precision.f90.

integer(i2p), public ir_precision::bir16p

Definition at line 206 of file IR_Precision.f90.

integer(i2p), public ir_precision::byr16p

Number of bits/bytes of kind=R16P variable.

Definition at line 206 of file IR_Precision.f90.

integer(i1p), public ir_precision::bir8p

Definition at line 207 of file IR_Precision.f90.

integer(i1p), public ir_precision::byr8p

Number of bits/bytes of kind=R8P variable.

Definition at line 207 of file IR_Precision.f90.

integer(i1p), public ir_precision::bir4p

Definition at line 208 of file IR_Precision.f90.

integer(i1p), public ir_precision::byr4p

Number of bits/bytes of kind=R4P variable.

Definition at line 208 of file IR_Precision.f90.

integer(i1p), public ir_precision::bir_p

Definition at line 209 of file IR_Precision.f90.

integer(i1p), public ir_precision::byr_p

Number of bits/bytes of kind=R_P variable.

Definition at line 209 of file IR_Precision.f90.

real(r16p), parameter, public ir_precision::smallr16p = tiny(1._R16P)

Smallest representable value of kind=R16P variable.

Definition at line 211 of file IR_Precision.f90.

real(r8p), parameter, public ir_precision::smallr8p = tiny(1._R8P )

Smallest representable value of kind=R8P variable.

Definition at line 212 of file IR_Precision.f90.

Referenced by data_type_vector::normalize(), data_type_vector::normalize_self(), and data_type_vector::normalized_self().

real(r4p), parameter, public ir_precision::smallr4p = tiny(1._R4P )

Smallest representable value of kind=R4P variable.

Definition at line 213 of file IR_Precision.f90.

real(r_p), parameter, public ir_precision::smallr_p = smallR8P

Smallest representable value of kind=R_P variable.

Definition at line 214 of file IR_Precision.f90.

integer(i8p), parameter, public ir_precision::mini8p = -huge(1_I8P)

Definition at line 216 of file IR_Precision.f90.

integer(i8p), parameter, public ir_precision::maxi8p = huge(1_I8P)

Min and max values of kind=I8P variable.

Definition at line 216 of file IR_Precision.f90.

integer(i4p), parameter, public ir_precision::mini4p = -huge(1_I4P)

Definition at line 217 of file IR_Precision.f90.

integer(i4p), parameter, public ir_precision::maxi4p = huge(1_I4P)

Min and max values of kind=I4P variable.

Definition at line 217 of file IR_Precision.f90.

integer(i2p), parameter, public ir_precision::mini2p = -huge(1_I2P)

Definition at line 218 of file IR_Precision.f90.

integer(i2p), parameter, public ir_precision::maxi2p = huge(1_I2P)

Min and max values of kind=I2P variable.

Definition at line 218 of file IR_Precision.f90.

integer(i1p), parameter, public ir_precision::mini1p = -huge(1_I1P)

Definition at line 219 of file IR_Precision.f90.

integer(i1p), parameter, public ir_precision::maxi1p = huge(1_I1P)

Min and max values of kind=I1P variable.

Definition at line 219 of file IR_Precision.f90.

integer(i_p), parameter, public ir_precision::mini_p = MinI4P

Definition at line 220 of file IR_Precision.f90.

integer(i_p), parameter, public ir_precision::maxi_p = MaxI4P

Min and max values of kind=I_P variable.

Definition at line 220 of file IR_Precision.f90.

integer(i8p), parameter, public ir_precision::bii8p = bit_size(MaxI8P)

Definition at line 222 of file IR_Precision.f90.

integer(i8p), parameter, public ir_precision::byi8p = bit_size(MaxI8P)/8_I8P

Number of bits/bytes of kind=I8P variable.

Definition at line 222 of file IR_Precision.f90.

integer(i4p), parameter, public ir_precision::bii4p = bit_size(MaxI4P)

Definition at line 223 of file IR_Precision.f90.

integer(i4p), parameter, public ir_precision::byi4p = bit_size(MaxI4P)/8_I4P

Number of bits/bytes of kind=I4P variable.

Definition at line 223 of file IR_Precision.f90.

integer(i2p), parameter, public ir_precision::bii2p = bit_size(MaxI2P)

Definition at line 224 of file IR_Precision.f90.

integer(i2p), parameter, public ir_precision::byi2p = bit_size(MaxI2P)/8_I2P

Number of bits/bytes of kind=I2P variable.

Definition at line 224 of file IR_Precision.f90.

integer(i1p), parameter, public ir_precision::bii1p = bit_size(MaxI1P)

Definition at line 225 of file IR_Precision.f90.

integer(i1p), parameter, public ir_precision::byi1p = bit_size(MaxI1P)/8_I1P

Number of bits/bytes of kind=I1P variable.

Definition at line 225 of file IR_Precision.f90.

integer(i_p), parameter, public ir_precision::bii_p = bit_size(MaxI_P)

Definition at line 226 of file IR_Precision.f90.

integer(i_p), parameter, public ir_precision::byi_p = bit_size(MaxI_P)/8_I_P

Number of bits/bytes of kind=I_P variable.

Definition at line 226 of file IR_Precision.f90.

real(r16p), parameter, public ir_precision::zeror16 = nearest(1._R16P, 1._R16P) - nearest(1._R16P, -1._R16P)

Smallest representable difference of kind=R16P variable.

Definition at line 233 of file IR_Precision.f90.

real(r8p), parameter, public ir_precision::zeror8 = nearest(1._R8P, 1._R8P) - nearest(1._R8P, -1._R8P)

Smallest representable difference of kind=R8P variable.

Definition at line 235 of file IR_Precision.f90.

real(r4p), parameter, public ir_precision::zeror4 = nearest(1._R4P, 1._R4P) - nearest(1._R4P, -1._R4P)

Smallest representable difference of kind=R4P variable.

Definition at line 237 of file IR_Precision.f90.

real(r_p), parameter, public ir_precision::zero = ZeroR8

Smallest representable difference of kind=R_P variable.

Definition at line 240 of file IR_Precision.f90.

character(8), parameter ir_precision::fi8pzp = '(I20.19)'

private

Output format with zero prefixing for kind=I8P variable.

Definition at line 176 of file IR_Precision.f90.

character(8), parameter ir_precision::fi4pzp = '(I11.10)'

private

Output format with zero prefixing for kind=I4P variable.

Definition at line 178 of file IR_Precision.f90.

character(6), parameter ir_precision::fi2pzp = '(I6.5)'

private

Output format with zero prefixing for kind=I2P variable.

Definition at line 180 of file IR_Precision.f90.

character(6), parameter ir_precision::fi1pzp = '(I4.3)'

private

Output format with zero prefixing for kind=I1P variable.

Definition at line 182 of file IR_Precision.f90.

character(8), parameter ir_precision::fi_pzp = FI4PZP

private

Output format with zero prefixing for kind=I_P variable.

Definition at line 184 of file IR_Precision.f90.