module Defs: sig .. end
sig
end
type t
val empty : t
t
val merge : t -> t -> t
t -> t -> t
val extract : Lang.F.pred -> t
Lang.F.pred -> t
val add : t Pervasives.ref -> Lang.F.pred -> unit
t Pervasives.ref -> Lang.F.pred -> unit
val domain : t -> Lang.F.Vars.t
t -> Lang.F.Vars.t