HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11616
RSHIFT(I, SHIFT)
Description
Bitwise right shift.
Class
Elemental nonstandard function.
SCALE(X, I)
Description
Returns X *
b
I
where
b
is the base in the model representation of X. See “The Real Number
System Model” on page 509 for a description of this.
Class
Elemental function.
Arguments
X must be of type real.
I must be of type integer.
Result type/
type parameters
Same as X.
Result value
The result has the value X *
b
I
, where
b
is defined in “The Real Number System Model” on
page 509, provided this result is within range; if not, the result is processor dependent.
SCAN(STRING, SET, BACK)
Optional argument
BACK