X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=finiteCofinite.mli;fp=finiteCofinite.mli;h=b8d8c1d7ddc96314d7640d426ac5cfdff9bb2dd8;hb=6a7025fee3c050eff58baa536a14d80baf5c1b87;hp=72b1aeca45ec6d1964d63d3e7ba13d2d2cd555bf;hpb=3445f7f08f15fe41e0d1bfaaabaacf60cdc10b61;p=SXSI%2Fxpathcomp.git diff --git a/finiteCofinite.mli b/finiteCofinite.mli index 72b1aec..b8d8c1d 100644 --- a/finiteCofinite.mli +++ b/finiteCofinite.mli @@ -33,11 +33,12 @@ module type S = val choose : t -> elt val hash : t -> int val equal : t -> t -> bool + val uid : t -> int val positive : t -> set val negative : t -> set val inj_positive : set -> t val inj_negative : set -> t end -module Make : functor (E : Sigs.Set) -> S with type elt = E.elt and type set = E.t +module Make : functor (E : Ptset.S) -> S with type elt = E.elt and type set = E.t