fraction

Date:: 10-12-2011

NAME

FRACTION - Returns the fractional part of the numeric model representation of the argument value

SYNOPSIS

FRACTION ([X=]x)

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

Fortran

DESCRIPTION

The FRACTION intrinsic function returns the fractional part of the numeric model representation of the argument value. It accepts the following argument:

x: Must be of type real

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

RETURN VALUES

The result type and type parameter are that of x. The result has this value:

x * b-e

where b and e are as defined in the real number system model. For more information on the real number system model, see the models(3i) man page.

If x has the value zero, the result has the value zero.

EXAMPLES

FRACTION(3.0) yields 0.75 for reals.