Intel® Fortran Compiler 17.0 Developer Guide and Reference
Elemental Intrinsic Subroutine (Generic): Copies a sequence of bits (a bit field) from one location to another. Intrinsic subroutines cannot be passed as actual arguments.
CALL MVBITS (from,frompos,len,to,topos)
from |
(Input) Integer. Can be of any integer type. It represents the location from which a bit field is transferred. |
frompos |
(Input) Can be of any integer type; it must not be negative. It identifies the first bit position in the field transferred from from. frompos + len must be less than or equal to BIT_SIZE(from). |
len |
(Input) Can be of any integer type; it must not be negative. It identifies the length of the field transferred from from. |
to |
(Input; output) Can be of any integer type, but must have the same kind parameter as from. It represents the location to which a bit field is transferred. 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. |
topos |
(Input) Can be of any integer type; it must not be negative. It identifies the starting position (within to) for the bits being transferred. topos + len must be less than or equal to BIT_SIZE(to). |
For more information on bit functions, see Bit Functions.
The model for the interpretation of an integer value as a sequence of bits is shown in Model for Bit Data.
You can also use the following specific routines:
BMVBITS |
Arguments from and to must be INTEGER(1). |
HMVBITS |
Arguments from and to must be INTEGER(2). |
IMVBITS |
Arguments from and to must be INTEGER(2). |
JMVBITS |
Arguments from and to must be INTEGER(4). |
KMVBITS |
Arguments from and to must be INTEGER(8). |
If TO has the initial value of 6, its value after a call to MVBITS(7, 2, 2, TO, 0) is 5.
The following shows another example:
INTEGER(1) :: from = 13 ! 00001101
INTEGER(1) :: to = 6 ! 00000110
CALL MVBITS(from, 2, 2, to, 0) ! returns to = 00000111
END