HP Fortran Programmer's Reference

Intrinsic procedures
Data representation models
Table 11-2 Intrinsic functions and data representation models (Continued)
Intrinsic function Description
“PRECISION(X)” on page 568 Decimal precision in real model for X
“RADIX(X)” on page 572 Base (radix) in integer or real model for X
“RANGE(X)” on page 575 Decimal exponent range in integer or real model for
X
“RRSPACING(X)” on page 580 1/(relative spacing near X)
“SCALE(X, I)” on page 581 X with real model exponent changed by I
“SET_EXPONENT(X, I)” on
page 585
The Bit Model
The bit model interprets a nonnegative scalar data object a of type integer as a sequence of
binary digits (bits), based upon the model:
where n is the number of bits, given by the intrinsic function BIT_SIZE and each b has a bit
value of 0 or 1. The bits are numbered from right to left beginning with 0.
The Integer Number System Model
The integer number system is modeled by:
where
i is the integer value.
474
Set the real model exponent of X to I
“SPACING(X)” on page 590 Absolute spacing near X
“TINY(X)” on page 597 Smallest number in real model for X
a b
k
2 k
n– 1
=
k = 0
Chapter 11