Data.Bits.HT
(.<<.)
(.>>.)