fromList :: [Int] -> SmallBitSet
fromList xs = SmallBitSet (foldl' setBit 0 xs)
fromList :: [Int] -> SmallBitSet
fromList xs = SmallBitSet (foldl' setBit 0 xs)
fromList xs = SmallBitSet (foldl' setBit 0 xs)