The Fraction function returns the fractional part of the representation of a REAL number.
x is an INTENT(IN) scalar or array of type REAL.
The result is of type REAL and the same kind as x. Its value is the fraction part of the physical representation of x.
Examplereal :: x.4.3 write(*,*) x.fraction(x) ! writes 4.300000 0.5375000 write(*,*) scale(fraction(x),exponent(x)) ! writes 4.300000