FRACTION(3f)

DESCRIPTION
FRACTION(X) returns the fractional part of the model representation of X.

STANDARD
Fortran 95 and later

CLASS
Elemental function

SYNTAX
Y = FRACTION(X)

ARGUMENTS

X The type of the argument shall be a REAL.

RETURN VALUE
The return value is of the same type and kind as the argument. The fractional part of the model representation of X is returned; it is X * RADIX(X)**(-EXPONENT(X)).

EXAMPLE
          program test_fraction
            real :: x
            x = 178.1387e-4
            print *, fraction(x), x * radix(x)**(-exponent(x))
          end program test_fraction

AUTHOR

This information was taken from the GFortran documentation (https://gcc.gnu.org/onlinedocs/gcc-5.3.0/gfortran/) and converted to a manpage by AstroFloyd (http://astrofloyd.org).