Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | endianL | = | 1 | |
integer, | public, | parameter | :: | endianB | = | 0 | |
integer, | public, | parameter | :: | ASCII | = | selected_char_kind('default') | |
integer, | public, | parameter | :: | UCS4 | = | selected_char_kind('default') | |
integer, | public, | parameter | :: | CK | = | selected_char_kind('default') | |
integer, | public, | parameter | :: | R16P | = | selected_real_kind(15, 307) | |
integer, | public, | parameter | :: | R8P | = | selected_real_kind(15, 307) | |
integer, | public, | parameter | :: | R4P | = | selected_real_kind(6, 37) | |
integer, | public, | parameter | :: | R_P | = | R8P | |
integer, | public, | parameter | :: | I8P | = | selected_int_kind(18) | |
integer, | public, | parameter | :: | I4P | = | selected_int_kind(9) | |
integer, | public, | parameter | :: | I2P | = | selected_int_kind(4) | |
integer, | public, | parameter | :: | I1P | = | selected_int_kind(2) | |
integer, | public, | parameter | :: | I_P | = | I4P | |
character, | public, | parameter | :: | FR16P | = | '(E23.15E3)' | |
character, | public, | parameter | :: | FR8P | = | '(E23.15E3)' | |
character, | public, | parameter | :: | FR4P | = | '(E13.6E2)' | |
character, | public, | parameter | :: | FR_P | = | FR8P | |
character, | public, | parameter | :: | FI8P | = | '(I20)' | |
character, | public, | parameter | :: | FI8PZP | = | '(I20.19)' | |
character, | public, | parameter | :: | FI4P | = | '(I11)' | |
character, | public, | parameter | :: | FI4PZP | = | '(I11.10)' | |
character, | public, | parameter | :: | FI2P | = | '(I6)' | |
character, | public, | parameter | :: | FI2PZP | = | '(I6.5)' | |
character, | public, | parameter | :: | FI1P | = | '(I4)' | |
character, | public, | parameter | :: | FI1PZP | = | '(I4.3)' | |
character, | public, | parameter | :: | FI_P | = | FI4P | |
character, | public, | parameter | :: | FI_PZP | = | FI4PZP | |
integer, | public, | parameter | :: | DR16P | = | 23 | |
integer, | public, | parameter | :: | DR8P | = | 23 | |
integer, | public, | parameter | :: | DR4P | = | 13 | |
integer, | public, | parameter | :: | DR_P | = | DR8P | |
integer, | public, | parameter | :: | DI8P | = | 20 | |
integer, | public, | parameter | :: | DI4P | = | 11 | |
integer, | public, | parameter | :: | DI2P | = | 6 | |
integer, | public, | parameter | :: | DI1P | = | 4 | |
integer, | public, | parameter | :: | DI_P | = | DI4P | |
integer, | public, | parameter | :: | CHARACTER_KINDS_LIST(1:3) | = | [ASCII, UCS4, CK] | |
integer, | public, | parameter | :: | REAL_KINDS_LIST(1:3) | = | [R8P, R4P, R_P] | |
character, | public, | parameter | :: | REAL_FORMATS_LIST(1:3) | = | [FR8P, FR4P//' ', FR_P] | |
integer, | public, | parameter | :: | INTEGER_KINDS_LIST(1:5) | = | [I8P, I4P, I2P, I1P, I_P] | |
character, | public, | parameter | :: | INTEGER_FORMATS_LIST(1:5) | = | [FI8P, FI4P, FI2P//' ', FI1P//' ', FI_P] | |
real(kind=R8P), | public, | parameter | :: | MinR16P | = | -huge(1._R8P) | |
real(kind=R8P), | public, | parameter | :: | MaxR16P | = | huge(1._R8P) | |
real(kind=R8P), | public, | parameter | :: | MinR8P | = | -huge(1._R8P) | |
real(kind=R8P), | public, | parameter | :: | MaxR8P | = | huge(1._R8P) | |
real(kind=R4P), | public, | parameter | :: | MinR4P | = | -huge(1._R4P) | |
real(kind=R4P), | public, | parameter | :: | MaxR4P | = | huge(1._R4P) | |
real(kind=R_P), | public, | parameter | :: | MinR_P | = | -huge(1._R_P) | |
real(kind=R_P), | public, | parameter | :: | MaxR_P | = | huge(1._R_P) | |
integer(kind=I8P), | public, | parameter | :: | MinI8P | = | -huge(1_I8P) | |
integer(kind=I4P), | public, | parameter | :: | MinI4P | = | -huge(1_I4P) | |
integer(kind=I2P), | public, | parameter | :: | MinI2P | = | -huge(1_I2P) | |
integer(kind=I1P), | public, | parameter | :: | MinI1P | = | -huge(1_I1P) | |
integer(kind=I_P), | public, | parameter | :: | MinI_P | = | -huge(1_I_P) | |
integer(kind=I8P), | public, | parameter | :: | MaxI8P | = | huge(1_I8P) | |
integer(kind=I4P), | public, | parameter | :: | MaxI4P | = | huge(1_I4P) | |
integer(kind=I2P), | public, | parameter | :: | MaxI2P | = | huge(1_I2P) | |
integer(kind=I1P), | public, | parameter | :: | MaxI1P | = | huge(1_I1P) | |
integer(kind=I_P), | public, | parameter | :: | MaxI_P | = | huge(1_I_P) | |
real(kind=R8P), | public, | parameter | :: | smallR16P | = | tiny(1._R8P) | |
real(kind=R8P), | public, | parameter | :: | smallR8P | = | tiny(1._R8P) | |
real(kind=R4P), | public, | parameter | :: | smallR4P | = | tiny(1._R4P) | |
real(kind=R_P), | public, | parameter | :: | smallR_P | = | tiny(1._R_P) | |
real(kind=R8P), | public, | parameter | :: | ZeroR16P | = | 0._R8P | |
real(kind=R8P), | public, | parameter | :: | ZeroR8P | = | 0._R8P | |
real(kind=R4P), | public, | parameter | :: | ZeroR4P | = | 0._R4P | |
real(kind=R_P), | public, | parameter | :: | ZeroR_P | = | 0._R_P | |
integer(kind=I1P), | public, | parameter | :: | BIR16P | = | storage_size(MaxR8P) | |
integer(kind=I1P), | public, | parameter | :: | BIR8P | = | storage_size(MaxR8P) | |
integer(kind=I1P), | public, | parameter | :: | BIR4P | = | storage_size(MaxR4P) | |
integer(kind=I1P), | public, | parameter | :: | BIR_P | = | storage_size(MaxR_P) | |
integer(kind=I1P), | public, | parameter | :: | BYR16P | = | BIR8P/8_I1P | |
integer(kind=I1P), | public, | parameter | :: | BYR8P | = | BIR8P/8_I1P | |
integer(kind=I1P), | public, | parameter | :: | BYR4P | = | BIR4P/8_I1P | |
integer(kind=I1P), | public, | parameter | :: | BYR_P | = | BIR_P/8_I1P | |
integer(kind=I8P), | public, | parameter | :: | BII8P | = | storage_size(MaxI8P) | |
integer(kind=I4P), | public, | parameter | :: | BII4P | = | storage_size(MaxI4P) | |
integer(kind=I2P), | public, | parameter | :: | BII2P | = | storage_size(MaxI2P) | |
integer(kind=I1P), | public, | parameter | :: | BII1P | = | storage_size(MaxI1P) | |
integer(kind=I_P), | public, | parameter | :: | BII_P | = | storage_size(MaxI_P) | |
integer(kind=I8P), | public, | parameter | :: | BYI8P | = | BII8P/8_I8P | |
integer(kind=I4P), | public, | parameter | :: | BYI4P | = | BII4P/8_I4P | |
integer(kind=I2P), | public, | parameter | :: | BYI2P | = | BII2P/8_I2P | |
integer(kind=I1P), | public, | parameter | :: | BYI1P | = | BII1P/8_I1P | |
integer(kind=I_P), | public, | parameter | :: | BYI_P | = | BII_P/8_I_P |