ieee_selected_real_kind

Date:: 10-12-2011

NAME

IEEE_SELECTED_REAL_KIND - Returns the real kind type parameter for an IEEE real data type

SYNOPSIS

IEEE_SELECTED_REAL_KIND ([[P=]p] [,[R=]r])

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

Fortran

IEEE Standard for Binary Floating-point Arithmetic

DESCRIPTION

The IEEE_SELECTED_REAL_KIND intrinsic function returns the real kind type parameter of an IEEE real data type with decimal precision of at least p digits and a decimal exponent range of at least r. At least one argument must be present, and the arguments are as follows:

p: Must be scalar and of type integer.
r: Must be scalar and of type integer.

IEEE_SELECTED_REAL_KIND is a transformational function. The name of this intrinsic cannot be passed as an argument.

NOTES

The IEEE intrinsic procedures use the named constants contained in a system module, so you must include the following statement in your program:

USE, INTRINSIC :: IEEE_ARITHMETIC

RETURN VALUES

The result is a default integer scalar. The result has a value equal to a value of the kind type parameter of an IEEE 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 exists, the result is -1 if the precision is not available, -2 if the exponent range is not available, and -3 if neither is available. 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.