関数でビットを操作できるようにするために、zext()Sun Studio Fortan コンパイラで関数を使用してに変換integer(kind=1)していました。integer(kind=4)ibits()
例:
! Accessing the most significant bit of a byte status
integer(kind=1) :: status
integer :: msb
msb = ibits (zext (status), 7, 1)
この関数は gfortran コンパイラの一部ではないようです。
gfortran で利用できる同等の関数はありますか?