Module Export Dec := WDecide (NatSet).
Parameter MkEquality : forall ( s0 s1 : NatSet.t )
( x : nat ),
NatSet.Equal s1 (NatSet.add x s0).

Lemma ThisLemmaWorks : forall ( s0 s1 : NatSet.t )
( a b : nat ),
NatSet.In a s0
-> NatSet.In a s1.