complement package:sbv

Complement.
>>> empty .== complement (full :: SSet Integer)
True
Complementing twice gets us back the original set:
>>> prove $ \(s :: SSet Integer) -> complement (complement s) .== s
Q.E.D.