RRSPACING(X)

Purpose

Returns the reciprocal of the relative spacing of the model numbers near the argument value.

Class

Elemental function

Argument type and attributes

X
An INTENT(IN) REAL

Result type and attributes

Same as X.

Result value

The result is:
ABS(FRACTION(X)) * FLOAT(RADIX(X))DIGITS(X)

Examples

IBM extension begins RRSPACING (-3.0) = 0.75 * 224. See Real data model. IBM extension ends