`ishift'
--------

ishift(I,COUNT)
     :: bit shift

RETURN
     整数

I COUNT
     整数

   * 整数 I の絶対値を bit 列とみて shift する.

   * I の符号は無視し, 非負の値を返す.

   * COUNT が正ならば右 shift, 負ならば左 shift を行う.

     [0] ctrl("hex",1);
     0x1
     [1] ishift(0x1000000,12);
     0x1000
     [2] ishift(0x1000,-12);
     0x1000000
     [3] ixor(0x1248,ishift(1,-16)-1);

参照
     *Note `iand ior ixor': iand ior ixor.

