floating(3F)

NAME
     - return scalar values associated with the argument derived from the
     model of floating point data.

SYNOPSIS
     exponent (x)
     fraction (x)
     nearest (x,s)
     rrspacing (x)
     scale (x,i)
     set_exponent (x,i)
     spacing (x)

DESCRIPTION
     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
     x.

     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
     real.

     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.