HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11552
Class
Nonstandard subroutine.
FNUM(UNIT)
Description
Get an operating system file descriptor.
Class
Inquiry nonstandard function.
FRACTION(X)
Description
Returns the fractional part of the model representation of the argument value.
Class
Elemental function.
Argument
X must be of type real.
Result type/
type parameters
Same as X.
Result value
The result has the value X *
b
-e
, where
b
and
e
are as defined in “The Real Number System
Model” on page 509. If X has the value zero, the result has the value zero.
FREE(P)
Description
Free a block of memory.