delete :: Int -> SmallBitSet -> SmallBitSet
delete i (SmallBitSet x) = SmallBitSet (clearBit x i)
delete :: Int -> SmallBitSet -> SmallBitSet
delete i (SmallBitSet x) = SmallBitSet (clearBit x i)
delete i (SmallBitSet x) = SmallBitSet (clearBit x i)