pm_kind.F90 File Reference

Go to the source code of this file.

Data Types
type	pm_kind::model_type
	This is the abstract derived type for creating objects of class model_type that contain the characteristics of the processor representation model used for the requested data object. More...
type	pm_kind::modeln_type
	This is the abstract derived type for creating objects of class modeln_type that contain the characteristics of the processor representation model used for the requested numeric data object. More...
type	pm_kind::modeli_type
	This is the abstract derived type for creating objects of class modeli_type that contain the characteristics of the processor representation model used for the requested integer data object. More...
type	pm_kind::modelb_type
	This is the abstract derived type for creating objects of class modelb_type that contain the characteristics of the processor representation model used for the requested numeric data object. More...
type	pm_kind::modelr_type
	This is the abstract derived type for creating objects of class modelr_type that contain the characteristics of the processor representation model used for the requested integer data object. More...

Modules
module	pm_kind
	This module defines the relevant Fortran kind type-parameters frequently used in the ParaMonte library for the two standard supported Fortran and C-Fortran Interoperation (CFI) modes.

Variables
integer, parameter	pm_kind::SK_DEF = kind("a")
integer, parameter	pm_kind::IK_DEF = kind(1)
integer, parameter	pm_kind::CK_DEF = kind(1.d0)
integer, parameter	pm_kind::RK_DEF = kind(1.d0)
integer, parameter	pm_kind::LK_DEF = kind(.true.)
integer, parameter	pm_kind::SK5 = character_kinds(SK5_ENABLED)
integer, parameter	pm_kind::SK4 = character_kinds(SK4_ENABLED)
integer, parameter	pm_kind::SK3 = character_kinds(SK3_ENABLED)
integer, parameter	pm_kind::SK2 = character_kinds(SK2_ENABLED)
integer, parameter	pm_kind::SK1 = character_kinds(SK1_ENABLED)
integer, parameter	pm_kind::IK5 = integer_kinds(IK5_ENABLED)
integer, parameter	pm_kind::IR5 = range(0_IK5)
integer, parameter	pm_kind::IK4 = integer_kinds(IK4_ENABLED)
integer, parameter	pm_kind::IR4 = range(0_IK4)
integer, parameter	pm_kind::IK3 = integer_kinds(IK3_ENABLED)
integer, parameter	pm_kind::IR3 = range(0_IK3)
integer, parameter	pm_kind::IK2 = integer_kinds(IK2_ENABLED)
integer, parameter	pm_kind::IR2 = range(0_IK2)
integer, parameter	pm_kind::IK1 = integer_kinds(IK1_ENABLED)
integer, parameter	pm_kind::IR1 = range(0_IK1)
integer, parameter	pm_kind::LK5 = logical_kinds(LK5_ENABLED)
integer, parameter	pm_kind::LK4 = logical_kinds(LK4_ENABLED)
integer, parameter	pm_kind::LK3 = logical_kinds(LK3_ENABLED)
integer, parameter	pm_kind::LK2 = logical_kinds(LK2_ENABLED)
integer, parameter	pm_kind::LK1 = logical_kinds(LK1_ENABLED)
integer, parameter	pm_kind::CK5 = real_kinds(CK5_ENABLED)
integer, parameter	pm_kind::CP5 = precision(0._CK5)
integer, parameter	pm_kind::CR5 = range(0._CK5)
integer, parameter	pm_kind::CK4 = real_kinds(CK4_ENABLED)
integer, parameter	pm_kind::CP4 = precision(0._CK4)
integer, parameter	pm_kind::CR4 = range(0._CK4)
integer, parameter	pm_kind::CK3 = real_kinds(CK3_ENABLED)
integer, parameter	pm_kind::CP3 = precision(0._CK3)
integer, parameter	pm_kind::CR3 = range(0._CK3)
integer, parameter	pm_kind::CK2 = real_kinds(CK2_ENABLED)
integer, parameter	pm_kind::CP2 = precision(0._CK2)
integer, parameter	pm_kind::CR2 = range(0._CK2)
integer, parameter	pm_kind::CK1 = real_kinds(CK1_ENABLED)
integer, parameter	pm_kind::CP1 = precision(0._CK1)
integer, parameter	pm_kind::CR1 = range(0._CK1)
integer, parameter	pm_kind::RK5 = real_kinds(RK5_ENABLED)
integer, parameter	pm_kind::RP5 = precision(0._RK5)
integer, parameter	pm_kind::RR5 = range(0._RK5)
integer, parameter	pm_kind::RK4 = real_kinds(RK4_ENABLED)
integer, parameter	pm_kind::RP4 = precision(0._RK4)
integer, parameter	pm_kind::RR4 = range(0._RK4)
integer, parameter	pm_kind::RK3 = real_kinds(RK3_ENABLED)
integer, parameter	pm_kind::RP3 = precision(0._RK3)
integer, parameter	pm_kind::RR3 = range(0._RK3)
integer, parameter	pm_kind::RK2 = real_kinds(RK2_ENABLED)
integer, parameter	pm_kind::RP2 = precision(0._RK2)
integer, parameter	pm_kind::RR2 = range(0._RK2)
integer, parameter	pm_kind::RK1 = real_kinds(RK1_ENABLED)
integer, parameter	pm_kind::RP1 = precision(0._RK1)
integer, parameter	pm_kind::RR1 = range(0._RK1)
integer, parameter	pm_kind::SK = SK_DEF
	The default character kind in the ParaMonte library: kind("a") in Fortran, c_char in C-Fortran Interoperation mode. More...
integer, parameter	pm_kind::IK = IK_DEF
	The default integer kind in the ParaMonte library: int32 in Fortran, c_int32_t in C-Fortran Interoperation mode. More...
integer, parameter	pm_kind::LK = LK_DEF
	The default logical kind in the ParaMonte library: kind(.true.) in Fortran, kind(.true.) in C-Fortran Interoperation mode. More...
integer, parameter	pm_kind::CK = CK_DEF
	The default complex kind in the ParaMonte library: real64 in Fortran, c_double_complex in C-Fortran Interoperation mode. More...
integer, parameter	pm_kind::RK = RK_DEF
	The default real kind in the ParaMonte library: real64 in Fortran, c_double in C-Fortran Interoperation mode. More...
integer, parameter	pm_kind::IK64 = IK64_DEF
	The integer kind for a 64-bits container. More...
integer, parameter	pm_kind::IK32 = IK32_DEF
	The integer kind for a 32-bits container. More...
integer, parameter	pm_kind::IK16 = IK16_DEF
	The integer kind for a 16-bits container. More...
integer, parameter	pm_kind::IK8 = IK8_DEF
	The integer kind for an 8-bits container. More...
integer, parameter	pm_kind::CK128 = CK128_DEF
	The complex kind for a 128-bits container. More...
integer, parameter	pm_kind::CK64 = CK64_DEF
	The complex kind for a 64-bits container. More...
integer, parameter	pm_kind::CK32 = CK32_DEF
	The complex kind for a 32-bits container. More...
integer, parameter	pm_kind::RK128 = RK128_DEF
	The real kind for a 128-bits container. More...
integer, parameter	pm_kind::RK64 = RK64_DEF
	The real kind for a 64-bits container. More...
integer, parameter	pm_kind::RK32 = RK32_DEF
	The real kind for a 32-bits container. More...
integer, parameter	pm_kind::SKU = selected_char_kind("iso_10646")
	The UNICODE string kind in Fortran mode. More...
integer, parameter	pm_kind::SKD = selected_char_kind("default")
	The DEFAULT string kind in Fortran mode. More...
integer, parameter	pm_kind::SKA = selected_char_kind("ascii")
	The ASCII string kind in Fortran mode. More...
integer, parameter	pm_kind::IKS = kind(1)
	The single-precision integer kind in Fortran mode. On most platforms, this is a 32-bit integer kind. More...
integer, parameter	pm_kind::IKD = selected_int_kind(18)
	The double precision integer kind in Fortran mode. On most platforms, this is a 64-bit integer kind. More...
integer, parameter	pm_kind::IKQ = selected_int_kind(36)
	The quadru-precision integer kind in Fortran mode. On most platforms, this is a 128-bit integer kind. There is no guarantee of the existence of this kind (e.g., Intel does not support this). More...
integer, parameter	pm_kind::RKS = kind(1.)
	The single-precision real kind in Fortran mode. On most platforms, this is an 32-bit real kind. More...
integer, parameter	pm_kind::RKD = kind(1.d0)
	The double precision real kind in Fortran mode. On most platforms, this is an 64-bit real kind. More...
integer, parameter	pm_kind::RKQ = selected_real_kind(2*precision(1._RKD))
	The quadru-precision real kind in Fortran mode. On most platforms, this is an 128-bit real kind. More...
integer, parameter	pm_kind::CKS = RKS
	The single-precision complex kind in Fortran mode. On most platforms, this is a 32-bit real kind. More...
integer, parameter	pm_kind::CKD = RKD
	The double precision complex kind in Fortran mode. On most platforms, this is a 64-bit real kind. More...
integer, parameter	pm_kind::CKQ = RKQ
	The quadru-precision complex kind in Fortran mode. On most platforms, this is a 128-bit real kind. More...
integer, dimension(*), parameter	pm_kind::SKALL = pack([SK1, SK2, SK3, SK4, SK5], 0 < [SK1, SK2, SK3, SK4, SK5])
	The integer vector containing all defined character kinds within the ParaMonte library. More...
integer, dimension(*), parameter	pm_kind::IKALL = pack([IK1, IK2, IK3, IK4, IK5], 0 < [IK1, IK2, IK3, IK4, IK5])
	The integer vector containing all defined integer kinds within the ParaMonte library. More...
integer, dimension(*), parameter	pm_kind::LKALL = pack([LK1, LK2, LK3, LK4, LK5], 0 < [LK1, LK2, LK3, LK4, LK5])
	The integer vector containing all defined logical kinds within the ParaMonte library. More...
integer, dimension(*), parameter	pm_kind::CKALL = pack([CK1, CK2, CK3, CK4, CK5], 0 < [CK1, CK2, CK3, CK4, CK5])
	The integer vector containing all defined complex kinds within the ParaMonte library. More...
integer, dimension(*), parameter	pm_kind::RKALL = pack([RK1, RK2, RK3, RK4, RK5], 0 < [RK1, RK2, RK3, RK4, RK5])
	The integer vector containing all defined real kinds within the ParaMonte library. More...
integer, parameter	pm_kind::IRL = minval([IR1, IR2, IR3, IR4, IR5], mask = 0 < [IR1, IR2, IR3, IR4, IR5])
	The scalar integer constant of intrinsic default kind, representing the lowest range among all integer kinds supported by the specific library build. More...
integer, parameter	pm_kind::IRH = maxval([IR1, IR2, IR3, IR4, IR5], mask = 0 < [IR1, IR2, IR3, IR4, IR5])
	The scalar integer constant of intrinsic default kind, representing the highest range among all integer kinds supported by the specific library build. More...
integer, parameter	pm_kind::CPL = minval([CP1, CP2, CP3, CP4, CP5], mask = 0 < [CP1, CP2, CP3, CP4, CP5])
	The scalar integer constant of intrinsic default kind, representing the lowest precision among all complex kinds supported by the specific library build. More...
integer, parameter	pm_kind::CPH = maxval([CP1, CP2, CP3, CP4, CP5], mask = 0 < [CP1, CP2, CP3, CP4, CP5])
	The scalar integer constant of intrinsic default kind, representing the highest precision among all complex kinds supported by the specific library build. More...
integer, parameter	pm_kind::CRL = minval([CR1, CR2, CR3, CR4, CR5], mask = 0 < [CR1, CR2, CR3, CR4, CR5])
	The scalar integer constant of intrinsic default kind, representing the lowest decimal exponent range among all complex kinds supported by the specific library build. More...
integer, parameter	pm_kind::CRH = maxval([CR1, CR2, CR3, CR4, CR5], mask = 0 < [CR1, CR2, CR3, CR4, CR5])
	The scalar integer constant of intrinsic default kind, representing the highest decimal exponent range among all complex kinds supported by the specific library build. More...
integer, parameter	pm_kind::RPL = minval([RP1, RP2, RP3, RP4, RP5], mask = 0 < [RP1, RP2, RP3, RP4, RP5])
	The scalar integer constant of intrinsic default kind, representing the lowest precision among all real kinds supported by the specific library build. More...
integer, parameter	pm_kind::RPH = maxval([RP1, RP2, RP3, RP4, RP5], mask = 0 < [RP1, RP2, RP3, RP4, RP5])
	The scalar integer constant of intrinsic default kind, representing the highest precision among all real kinds supported by the specific library build. More...
integer, parameter	pm_kind::RRL = minval([RR1, RR2, RR3, RR4, RR5], mask = 0 < [RR1, RR2, RR3, RR4, RR5])
	The scalar integer constant of intrinsic default kind, representing the lowest decimal exponent range among all real kinds supported by the specific library build. More...
integer, parameter	pm_kind::RRH = maxval([RR1, RR2, RR3, RR4, RR5], mask = 0 < [RR1, RR2, RR3, RR4, RR5])
	The scalar integer constant of intrinsic default kind, representing the highest decimal exponent range among all real kinds supported by the specific library build. More...
integer, parameter	pm_kind::IKL = selected_int_kind(IRL)
	The scalar integer constant of intrinsic default kind, representing the lowest range integer kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::CKL = selected_real_kind(CPL)
	The scalar integer constant of intrinsic default kind, representing the lowest-precision complex kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::RKL = selected_real_kind(RPL)
	The scalar integer constant of intrinsic default kind, representing the lowest-precision real kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::CKLR = selected_real_kind(r = CRL)
	The scalar integer constant of intrinsic default kind, representing the highest-decimal-exponent-range complex kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::RKLR = selected_real_kind(r = RRL)
	The scalar integer constant of intrinsic default kind, representing the highest-decimal-exponent-range real kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::IKH = selected_int_kind(IRH)
	The scalar integer constant of intrinsic default kind, representing the highest range integer kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::CKH = selected_real_kind(CPH)
	The scalar integer constant of intrinsic default kind, representing the highest-precision complex kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::RKH = selected_real_kind(RPH)
	The scalar integer constant of intrinsic default kind, representing the highest-precision real kind type parameter available in the specific library build. More...
integer, dimension(*), parameter	pm_kind::CKHR_VEC_RAW = [ selected_real_kind(merge(huge(1), CP5, CP5 < 1), r = CRH) , selected_real_kind(merge(huge(1), CP4, CP4 < 1), r = CRH) , selected_real_kind(merge(huge(1), CP3, CP3 < 1), r = CRH) , selected_real_kind(merge(huge(1), CP2, CP2 < 1), r = CRH) , selected_real_kind(merge(huge(1), CP1, CP1 < 1), r = CRH) ]
integer, dimension(*), parameter	pm_kind::CKHR_VEC = pack(CKHR_VEC_RAW, 0 <= CKHR_VEC_RAW)
integer, parameter	pm_kind::CKHR = CKHR_VEC(1)
	The scalar integer constant of intrinsic default kind, representing the highest-decimal-exponent-range complex kind type parameter available in the specific library build. More...
integer, dimension(*), parameter	pm_kind::RKHR_VEC_RAW = [ selected_real_kind(merge(huge(1), RP5, RP5 < 1), r = RRH) , selected_real_kind(merge(huge(1), RP4, RP4 < 1), r = RRH) , selected_real_kind(merge(huge(1), RP3, RP3 < 1), r = RRH) , selected_real_kind(merge(huge(1), RP2, RP2 < 1), r = RRH) , selected_real_kind(merge(huge(1), RP1, RP1 < 1), r = RRH) ]
integer, dimension(*), parameter	pm_kind::RKHR_VEC = pack(RKHR_VEC_RAW, 0 <= RKHR_VEC_RAW)
integer, parameter	pm_kind::RKHR = RKHR_VEC(1)
	The scalar integer constant of intrinsic default kind, representing the highest-decimal-exponent-range real kind type parameter available in the specific library build. More...
integer, parameter	pm_kind::IKW = selected_int_kind(1)
	The scalar integer constant of intrinsic default kind, representing the Worst-range integer kind supported by the processor. More...
integer, parameter	pm_kind::CKW = selected_real_kind(1)
	The scalar integer constant of intrinsic default kind, representing the Worst-precision complex kind supported by the processor. More...
integer, parameter	pm_kind::RKW = selected_real_kind(1)
	The scalar integer constant of intrinsic default kind, representing the Worst-precision real kind supported by the processor. More...
integer, parameter	pm_kind::CKWR = selected_real_kind(r = 1)
	The scalar integer constant of intrinsic default kind, representing the Worst-decimal-exponent-range complex kind supported by the processor. More...
integer, parameter	pm_kind::RKWR = selected_real_kind(r = 1)
	The scalar integer constant of intrinsic default kind, representing the Worst-decimal-exponent-range real kind supported by the processor. More...
integer, dimension(*), parameter	pm_kind::integer_kinds_range = [ range(int(0, kind = integer_kinds(min(size(integer_kinds), 1)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 2)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 3)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 4)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 5)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 6)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 7)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 8)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 9)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 10)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 11)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 12)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 13)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 14)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 15)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 16)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 17)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 18)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 19)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 20)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 21)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 22)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 23)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 24)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 25)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 26)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 27)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 28)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 29)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 30)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 31)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 32)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 33)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 34)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 35)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 36)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 37)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 38)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 39)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 40)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 40)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 41)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 42)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 43)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 44)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 45)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 46)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 47)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 48)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 49)))) , range(int(0, kind = integer_kinds(min(size(integer_kinds), 50)))) ]
	The vector of integer constants of intrinsic default kind, representing the vector of 50 possible integer ranges of the kinds provided in integer_kinds of the intrinsic Fortran module iso_fortran_env. More...
integer, dimension(*), parameter	pm_kind::real_kinds_range = [ range(real(0, kind = real_kinds(min(size(real_kinds), 1)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 2)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 3)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 4)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 5)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 6)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 7)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 8)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 9)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 10)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 11)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 12)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 13)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 14)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 15)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 16)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 17)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 18)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 19)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 20)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 21)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 22)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 23)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 24)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 25)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 26)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 27)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 28)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 29)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 30)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 31)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 32)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 33)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 34)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 35)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 36)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 37)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 38)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 39)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 40)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 40)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 41)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 42)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 43)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 44)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 45)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 46)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 47)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 48)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 49)))) , range(real(0, kind = real_kinds(min(size(real_kinds), 50)))) ]
	The vector of integer constants of intrinsic default kind, representing the vector of 50 possible real precisions of the kinds provided in real_kinds of the intrinsic Fortran module iso_fortran_env. More...
integer, dimension(*), parameter	pm_kind::real_kinds_precision = [ precision(real(0, kind = real_kinds(min(size(real_kinds), 1)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 2)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 3)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 4)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 5)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 6)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 7)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 8)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 9)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 10)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 11)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 12)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 13)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 14)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 15)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 16)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 17)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 18)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 19)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 20)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 21)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 22)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 23)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 24)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 25)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 26)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 27)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 28)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 29)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 30)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 31)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 32)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 33)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 34)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 35)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 36)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 37)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 38)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 39)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 40)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 40)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 41)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 42)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 43)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 44)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 45)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 46)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 47)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 48)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 49)))) , precision(real(0, kind = real_kinds(min(size(real_kinds), 50)))) ]
	The vector of integer constants of intrinsic default kind, representing the vector of 50 possible real highest-range precisions of the kinds provided in real_kinds of the intrinsic Fortran module iso_fortran_env. More...
integer, parameter	pm_kind::real_kinds_range_max = maxval(real_kinds_range, dim = 1)
	The scalar integer constant of intrinsic default kind, representing the highest-decimal-exponent-range of real types made available by the processor. More...
integer, parameter	pm_kind::real_kinds_precision_max = maxval(real_kinds_precision, dim = 1)
	The scalar integer constant of intrinsic default kind, representing the highest-precision of real types made available by the processor. More...
integer, parameter	pm_kind::real_kinds_precision_min = minval(real_kinds_precision, dim = 1)
	The scalar integer constant of intrinsic default kind, representing the lowest-precision of real types made available by the processor. More...
real, parameter	pm_kind::real_kinds_precision_hop = real(real_kinds_precision_max - real_kinds_precision_min) / size(real_kinds_precision)
	The scalar real constant of intrinsic default kind, representing the step size between the highest and lowest-precision of real types made available by the processor. More...
integer, dimension(*), parameter	pm_kind::real_kinds_prmax_kind = [ selected_real_kind(p = real_kinds_precision_max, r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 0)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 1)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 2)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 3)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 4)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 5)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 6)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 7)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 8)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 9)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 10)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 11)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 12)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 13)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 14)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 15)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 16)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 17)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 18)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 19)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 20)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 21)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 22)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 23)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 24)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 25)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 26)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 27)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 28)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 29)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 30)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 31)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 32)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 33)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 34)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 35)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 36)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 37)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 38)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 39)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 40)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 41)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 42)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 43)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 44)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 45)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 46)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 47)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 48)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 49)), r = real_kinds_range_max) , selected_real_kind(p = max(real_kinds_precision_min, nint(real_kinds_precision_max - real_kinds_precision_hop * 50)), r = real_kinds_range_max) , selected_real_kind(p = real_kinds_precision_min, r = real_kinds_range_max) ]
	The vector of integer constants of intrinsic default kind, representing the 50 possible real highest-range precisions of the kinds provided in real_kinds of the intrinsic Fortran module iso_fortran_env. More...
integer, dimension(*), parameter	pm_kind::real_kinds_prmax_kind_avail = pack(real_kinds_prmax_kind, 0 <= real_kinds_prmax_kind)
	The vector of integer constants of intrinsic default kind, containing all maximum-range real kind type parameters corresponding to various precisions provided in real_kinds of the intrinsic Fortran module iso_fortran_env. More...
integer, parameter	pm_kind::IKB = selected_int_kind(maxval(integer_kinds_range, dim = 1))
	The scalar integer constant of intrinsic default kind, representing the Best-range integer kind supported by the processor. More...
integer, parameter	pm_kind::CKB = selected_real_kind(maxval(real_kinds_precision, dim = 1))
	The scalar integer constant of intrinsic default kind, representing the Best-precision complex kind supported by the processor. More...
integer, parameter	pm_kind::RKB = selected_real_kind(maxval(real_kinds_precision, dim = 1))
	The scalar integer constant of intrinsic default kind, representing the Best-precision real kind supported by the processor. More...
integer, parameter	pm_kind::CKBR = real_kinds_prmax_kind_avail(1)
	The scalar integer constant of intrinsic default kind, representing the Best-decimal-exponent-range complex kind supported by the processor. More...
integer, parameter	pm_kind::RKBR = real_kinds_prmax_kind_avail(1)
	The scalar integer constant of intrinsic default kind, representing the Best-decimal-exponent-range real kind supported by the processor. More...