2 lines
107 B
FortranFixed
2 lines
107 B
FortranFixed
|
call mvbits(k, 2, 4, j, 0) ! copy a sequence of 4 bits from k starting at bit 2 into j starting at bit 0
|