PENF global (exposed) parameters and variables.
All module defined entities are public.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | is_initialized | = | .false. | Check the initialization of some variables that must be initialized. |
|
| integer, | public, | parameter | :: | endianL | = | 1 | Little endian parameter. |
| integer, | public, | parameter | :: | endianB | = | 0 | Big endian parameter. |
| integer, | public | :: | endian | = | endianL | Bit ordering: Little endian (endianL), or Big endian (endianB). |
|
| integer, | public, | parameter | :: | R16P | = | selected_real_kind(15, 307) | Defined as R8P; 64 bits. |
| integer, | public, | parameter | :: | R8P | = | selected_real_kind(15, 307) | 15 digits, range [10−307,10+307−1]; 64 bits. |
| integer, | public, | parameter | :: | R4P | = | selected_real_kind(6, 37) | 6 digits, range [10−37,10+37−1]; 32 bits. |
| integer, | public, | parameter | :: | R_P | = | R8P | Default real precision. |
| integer, | public, | parameter | :: | I8P | = | selected_int_kind(18) | Range [−263,+263−1], 19 digits plus sign; 64 bits. |
| integer, | public, | parameter | :: | I4P | = | selected_int_kind(9) | Range [−231,+231−1], 10 digits plus sign; 32 bits. |
| integer, | public, | parameter | :: | I2P | = | selected_int_kind(4) | Range [−215,+215−1], 5 digits plus sign; 16 bits. |
| integer, | public, | parameter | :: | I1P | = | selected_int_kind(2) | Range [−27,+27−1], 3 digits plus sign; 8 bits. |
| integer, | public, | parameter | :: | I_P | = | I4P | Default integer precision. |
| character(len=*), | public, | parameter | :: | FR16P | = | '(E23.15E3)' | Output format for kind=R16P real. |
| character(len=*), | public, | parameter | :: | FR8P | = | '(E23.15E3)' | Output format for kind=R8P real. |
| character(len=*), | public, | parameter | :: | FR4P | = | '(E13.6E2)' | Output format for kind=R4P real. |
| character(len=*), | public, | parameter | :: | FR_P | = | FR8P | Output format for kind=R_P real. |
| character(len=*), | public, | parameter | :: | FI8P | = | '(I20)' | Output format for kind=I8P integer. |
| character(len=*), | public, | parameter | :: | FI8PZP | = | '(I20.19)' | Output format for kind=I8P integer with zero prefixing. |
| character(len=*), | public, | parameter | :: | FI4P | = | '(I11)' | Output format for kind=I4P integer. |
| character(len=*), | public, | parameter | :: | FI4PZP | = | '(I11.10)' | Output format for kind=I4P integer with zero prefixing. |
| character(len=*), | public, | parameter | :: | FI2P | = | '(I6)' | Output format for kind=I2P integer. |
| character(len=*), | public, | parameter | :: | FI2PZP | = | '(I6.5)' | Output format for kind=I2P integer with zero prefixing. |
| character(len=*), | public, | parameter | :: | FI1P | = | '(I4)' | Output format for kind=I1P integer. |
| character(len=*), | public, | parameter | :: | FI1PZP | = | '(I4.3)' | Output format for kind=I1P integer with zero prefixing. |
| character(len=*), | public, | parameter | :: | FI_P | = | FI4P | Output format for kind=I_P integer. |
| character(len=*), | public, | parameter | :: | FI_PZP | = | FI4PZP | Output format for kind=I_P integer with zero prefixing. |
| integer, | public, | parameter | :: | DR16P | = | 23 | Number of digits of output format FR16P. |
| integer, | public, | parameter | :: | DR8P | = | 23 | Number of digits of output format FR8P. |
| integer, | public, | parameter | :: | DR4P | = | 13 | Number of digits of output format FR4P. |
| integer, | public, | parameter | :: | DR_P | = | DR8P | Number of digits of output format FR_P. |
| integer, | public, | parameter | :: | DI8P | = | 20 | Number of digits of output format I8P. |
| integer, | public, | parameter | :: | DI4P | = | 11 | Number of digits of output format I4P. |
| integer, | public, | parameter | :: | DI2P | = | 6 | Number of digits of output format I2P. |
| integer, | public, | parameter | :: | DI1P | = | 4 | Number of digits of output format I1P. |
| integer, | public, | parameter | :: | DI_P | = | DI4P | Number of digits of output format I_P. |
| integer, | public, | parameter | :: | REAL_KINDS_LIST(1:4) | = | [R16P, R8P, R4P, R_P] | List of real kinds. |
| character(len=*), | public, | parameter | :: | REAL_FORMATS_LIST(1:4) | = | [FR16P, FR8P, FR4P//' ', FR_P] | List of real formats. |
| integer, | public, | parameter | :: | INTEGER_KINDS_LIST(1:5) | = | [I8P, I4P, I2P, I1P, I_P] | List of integer kinds. |
| character(len=*), | public, | parameter | :: | INTEGER_FORMATS_LIST(1:5) | = | [FI8P, FI4P, FI2P//' ', FI1P//' ', FI_P] | List of integer formats. |
| real(kind=R16P), | public, | parameter | :: | MinR16P | = | -huge(1._R16P) | Minimum value of kind=R16P real. |
| real(kind=R16P), | public, | parameter | :: | MaxR16P | = | huge(1._R16P) | Maximum value of kind=R16P real. |
| real(kind=R8P), | public, | parameter | :: | MinR8P | = | -huge(1._R8P) | Minimum value of kind=R8P real. |
| real(kind=R8P), | public, | parameter | :: | MaxR8P | = | huge(1._R8P) | Maximum value of kind=R8P real. |
| real(kind=R4P), | public, | parameter | :: | MinR4P | = | -huge(1._R4P) | Minimum value of kind=R4P real. |
| real(kind=R4P), | public, | parameter | :: | MaxR4P | = | huge(1._R4P) | Maximum value of kind=R4P real. |
| real(kind=R_P), | public, | parameter | :: | MinR_P | = | MinR8P | Minimum value of kind=R_P real. |
| real(kind=R_P), | public, | parameter | :: | MaxR_P | = | MaxR8P | Maximum value of kind=R_P real. |
| integer(kind=I8P), | public, | parameter | :: | MinI8P | = | -huge(1_I8P) | Minimum value of kind=I8P integer. |
| integer(kind=I4P), | public, | parameter | :: | MinI4P | = | -huge(1_I4P) | Minimum value of kind=I4P integer. |
| integer(kind=I2P), | public, | parameter | :: | MinI2P | = | -huge(1_I2P) | Minimum value of kind=I2P integer. |
| integer(kind=I1P), | public, | parameter | :: | MinI1P | = | -huge(1_I1P) | Minimum value of kind=I1P integer. |
| integer(kind=I_P), | public, | parameter | :: | MinI_P | = | MinI4P | Minimum value of kind=I_P integer. |
| integer(kind=I8P), | public, | parameter | :: | MaxI8P | = | huge(1_I8P) | Maximum value of kind=I8P integer. |
| integer(kind=I4P), | public, | parameter | :: | MaxI4P | = | huge(1_I4P) | Maximum value of kind=I4P integer. |
| integer(kind=I2P), | public, | parameter | :: | MaxI2P | = | huge(1_I2P) | Maximum value of kind=I2P integer. |
| integer(kind=I1P), | public, | parameter | :: | MaxI1P | = | huge(1_I1P) | Maximum value of kind=I1P integer. |
| integer(kind=I_P), | public, | parameter | :: | MaxI_P | = | MaxI4P | Maximum value of kind=I_P integer. |
| real(kind=R16P), | public, | parameter | :: | smallR16P | = | tiny(1._R16P) | Smallest representable value of kind=R16P real. |
| real(kind=R8P), | public, | parameter | :: | smallR8P | = | tiny(1._R8P) | Smallest representable value of kind=R8P real. |
| real(kind=R4P), | public, | parameter | :: | smallR4P | = | tiny(1._R4P) | Smallest representable value of kind=R4P real. |
| real(kind=R_P), | public, | parameter | :: | smallR_P | = | smallR8P | Smallest representable value of kind=R_P real. |
| real(kind=R16P), | public, | parameter | :: | ZeroR16 | = | nearest(1._R16P, 1._R16P)-nearest(1._R16P, -1._R16P) | Smallest representable difference of kind=R16P real. |
| real(kind=R8P), | public, | parameter | :: | ZeroR8 | = | nearest(1._R8P, 1._R8P)-nearest(1._R8P, -1._R8P) | Smallest representable difference of kind=R8P real. |
| real(kind=R4P), | public, | parameter | :: | ZeroR4 | = | nearest(1._R4P, 1._R4P)-nearest(1._R4P, -1._R4P) | Smallest representable difference of kind=R4P real. |
| real(kind=R_P), | public, | parameter | :: | Zero | = | ZeroR8 | Smallest representable difference of kind=R_P real. |
| integer(kind=I2P), | public | :: | BIR16P | Number of bits of kind=R16P real. |
|||
| integer(kind=I1P), | public | :: | BIR8P | Number of bits of kind=R8P real. |
|||
| integer(kind=I1P), | public | :: | BIR4P | Number of bits of kind=R4P real. |
|||
| integer(kind=I1P), | public | :: | BIR_P | Number of bits of kind=R_P real. |
|||
| integer(kind=I2P), | public | :: | BYR16P | Number of bytes of kind=R16P real. |
|||
| integer(kind=I1P), | public | :: | BYR8P | Number of bytes of kind=R8P real. |
|||
| integer(kind=I1P), | public | :: | BYR4P | Number of bytes of kind=R4P real. |
|||
| integer(kind=I1P), | public | :: | BYR_P | Number of bytes of kind=R_P real. |
|||
| integer(kind=I8P), | public, | parameter | :: | BII8P | = | bit_size(MaxI8P) | Number of bits of kind=I8P integer. |
| integer(kind=I4P), | public, | parameter | :: | BII4P | = | bit_size(MaxI4P) | Number of bits of kind=I4P integer. |
| integer(kind=I2P), | public, | parameter | :: | BII2P | = | bit_size(MaxI2P) | Number of bits of kind=I2P integer. |
| integer(kind=I1P), | public, | parameter | :: | BII1P | = | bit_size(MaxI1P) | Number of bits of kind=I1P integer. |
| integer(kind=I_P), | public, | parameter | :: | BII_P | = | bit_size(MaxI_P) | Number of bits of kind=I_P integer. |
| integer(kind=I8P), | public, | parameter | :: | BYI8P | = | bit_size(MaxI8P)/8_I8P | Number of bytes of kind=I8P integer. |
| integer(kind=I4P), | public, | parameter | :: | BYI4P | = | bit_size(MaxI4P)/8_I4P | Number of bytes of kind=I4P integer. |
| integer(kind=I2P), | public, | parameter | :: | BYI2P | = | bit_size(MaxI2P)/8_I2P | Number of bytes of kind=I2P integer. |
| integer(kind=I1P), | public, | parameter | :: | BYI1P | = | bit_size(MaxI1P)/8_I1P | Number of bytes of kind=I1P integer. |
| integer(kind=I_P), | public, | parameter | :: | BYI_P | = | bit_size(MaxI_P)/8_I_P | Number of bytes of kind=I_P integer. |