IBITS
IBITS
書式
IBITS(I,POS,LEN)
機能
整数Iの第POSビットから第(POS+LEN-1)ビットまでを取り出し右詰めして、 残りのビットを0にする。
引数
I
:整数型
POS
:整数型(0<POS+LEN≦BIT_SIZE(I))
LEN
:整数型(0<LEN)
戻り値
型、種別型パラメタは引数Iと同じである。
サンプルプログラム
WRITE(*,*) IBITS(14,1,3)
実行すると、IBITS(30,1,3)は、下図のように整数の 第1ビットから第3ビット数までを取り出し右詰めするので7になる。