Language Reference

SELECTED_REAL_KIND(P, R)

Returns a value of the kind type parameter of a real data type with decimal precision of at least P digits and a decimal exponent range of at least R.

P (optional)

must be scalar and of type integer.

R (optional)

must be scalar and of type integer.

Class

Transformational function

Result Type and Attributes

Default integer scalar.

Result Value

• The result has a value equal to a value of the kind type parameter of a real data type with decimal precision, as returned by the function PRECISION, of at least P digits and a decimal exponent range, as returned by the function RANGE, of at least R, or if no such kind type parameter is available,
  • If the precision is not available, the result is -1.
  • If the exponent range is not available, the result is -2.
  • If neither is available, the result is -3.
• If more than one kind type parameter value meets the criteria, the value returned is the one with the smallest decimal precision, unless there are several such values, in which case the smallest of these kind values is returned.

+-------------------------------IBM Extension--------------------------------+

Examples

SELECTED_REAL_KIND (6, 70) has the value 8.

+----------------------------End of IBM Extension----------------------------+

Related Information

Kind type parameters supported by XL Fortran are defined in Type Parameters and Specifiers.