X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=finiteCofinite.mli;h=b0dccc828a02d74ee5a0eecc5348fb4c611b2fa2;hb=a6a05531716a001b369e018c9d2c87ce532ef163;hp=7f98130a87f5cd19d77458de6598e547f830b323;hpb=dc91851aaeac91a71eba2c266d0227adea0c5815;p=SXSI%2Fxpathcomp.git diff --git a/finiteCofinite.mli b/finiteCofinite.mli index 7f98130..b0dccc8 100644 --- a/finiteCofinite.mli +++ b/finiteCofinite.mli @@ -33,9 +33,12 @@ module type S = val choose : t -> elt val hash : t -> int val equal : t -> t -> bool + val uid : t -> Uid.t 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