testBit

testBit :: Bits a => a -> Int -> Bool
base Data.Bits