rrspacing(3I)

NAME
     RRSPACING - Returns the reciprocal of the relative spacing of numeric
     model numbers near the argument value

SYNOPSIS
     RRSPACING ([X=]x)

STANDARDS
     Fortran

DESCRIPTION
     The RRSPACING intrinsic function returns the reciprocal of the
     relative spacing of the numeric real model numbers near the argument
     value.  For more information on the real number model, see the
     MODELS(3I) man page.  It accepts the following argument:

     x         Must be of type real.

     RRSPACING is an elemental function.  The name of this intrinsic cannot
     be passed as an argument.

RETURN VALUES
     The result type and type parameter are the same as x.  The result has
     the value (|(x)(b**-e) |) (b**p) where b, e, and p are defined in the
     real number model.

EXAMPLES
     The following code was run:

          REAL(KIND=4) R4
          REAL(KIND=8) R8
          REAL(KIND=16) R16
          REAL RD
          R4=-3.0_4
          R8=-3.0_8
          R16=-3.0_16
          RD=-3.0
          PRINT *,'RRSPACING R4=',RRSPACING(R4)
          PRINT *,'RRSPACING R8=',RRSPACING(R8)
          PRINT *,'RRSPACING R16=',RRSPACING(R16)
          PRINT *,'RRSPACING RD=',RRSPACING(RD)
          END

     The results were as follows:

          RRSPACING R4= 12582912.
          RRSPACING R8= 6755399441055744.
          RRSPACING R16= 1.216944576219100225436835007716096E+32
          RRSPACING RD= 12582912.

SEE ALSO
     MODELS(3I)