CompareGlobSys.Sys
module LVar : sig ... end
module GVar : sig ... end
module D : sig ... end
module G : sig ... end
val system : LVar.t -> ((LVar.t -> D.t) -> (LVar.t -> D.t -> unit) -> (GVar.t -> G.t) -> (GVar.t -> G.t -> unit) -> D.t) option
val iter_vars : (LVar.t -> D.t) -> (GVar.t -> G.t) -> VarQuery.t -> LVar.t VarQuery.f -> GVar.t VarQuery.f -> unit
val sys_change : (LVar.t -> D.t) -> (GVar.t -> G.t) -> [ `G of GVar.t | `L of LVar.t ] ConstrSys.sys_change_info