HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11598
Case 2 A is of type real. If P is not 0, the value of the result is A –FLOOR (A / P) *
P. If P=0, the result is processor-dependent.
MVBITS(FROM, FROMPOS, LEN, TO, TOPOS)
Description
Copies a sequence of bits from one data object to another.
Class
Elemental subroutine.
Arguments
FROM must be of type integer. It is an INTENT(IN) argument.
FROMPOS must be of type integer and nonnegative. It is an INTENT(IN) argument.
FROMPOS + LEN must be less than or equal to BIT_SIZE(FROM). The model for
the interpretation of an integer value as a sequence of bits is described in
“The Bit Model” on page 508.
LEN must be of type integer and nonnegative. It is an INTENT(IN) argument.
TO must be a variable of type integer with the same kind type parameter value
as FROM and may be the same variable as FROM. It is an INTENT(INOUT)
argument.
TO is set by copying the sequence of bits of length LEN, starting at position
FROMPOS of FROM to position TOPOS of TO. No other bits of TO are altered. On
return, the LEN bits of TO starting at TOPOS are equal to the value that the
LEN bits of FROM starting at FROMPOS had on entry.
The model for the interpretation of an integer value as a sequence of bits is
described in “The Bit Model” on page 508.
TOPOS must be of type integer and nonnegative. It is an INTENT(IN) argument.
TOPOS + LEN must be less than or equal to BIT_SIZE(TO).
Specific forms
BMVBITS, HMVBITS.