* Seal the representation of states

[tatoo.git] / src / stateSet.ml

diff --git a/src/stateSet.ml b/src/stateSet.ml
index 2fec234..c55ff6e 100644 (file)
--- a/src/stateSet.ml
+++ b/src/stateSet.ml
@@ -13,13 +13,9 @@
 (*                                                                     *)
 (***********************************************************************)
 
-(*
-  Time-stamp: <Last modified on 2013-04-04 18:46:16 CEST by Kim Nguyen>
-*)
-
 open Format
 
-include Ptset.Make (Hcons.PosInt)
+include Ptset.Make (State)
 
 let print ppf s =
   fprintf ppf "{ %a }"