- return scalar values associated with the argument derived from the
model of floating point data.
These Fortran 90 inquiry functions return scalar values which describe
the value of x as components of the model of floating point data. The
model for real x is defined by section 13.71.1 of the Fortran standard.
In each case the argument x is of type real and with the exception of
exponent the type and kind type parameter of each result is the same as
The exponent function returns an integer of default type equal to the
base two exponent (e) of x if the argument is non-zero. If zero, the
result is zero.
The fraction function returns the fractional part ( X * 2 ** (-e)) of x
if the argument is non-zero. If zero, the result is zero.
The nearest function returns the nearest representable number to x in the
direction of infinity and with the same sign as s. s is also of type
The rrspacing function returns the reciprocal of the relative spacing of
numbers near x.
The scale function returns x * ( 2 ** i )
The set_exponent function returns the number whose fractional part is the
fractional part of x and whose exponent part is i , if this result is
within range. That is the result is x * (2 ** ( i - e )). If x is zero,
the result is zero.
The spacing function returns the absolute spacing of numbers near x.
PPPPaaaaggggeeee 2222 [ Back ]