ISOBIT - extract a bit string from a word.

Usage:

call isobit(lbit, word, value, rbit)

Where:

lbit: is the leftmost bit to extract.
word: is an single word integer or real variable containing the bits to extract.
value: is an integer variable where the extracted bits are stored.
rbit: is the rightmost bit to extract.

Description:

ISOBIT extracts a sequence of bits from "word" and stores them right justified in "value". The most significant (left most) bit is numbered 0, the least significant 35.

This routine is obsolete, use the intrinsic function FLD instead.