# Fortran Wiki fraction

## 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

category: intrinsics