sig
  module LM :
    sig
      type y = SidSet.t
      type t = Lmap_bitwise.Make_bitwise(SidSet).t
      module Datatype :
        sig
          type t = t
          val descr : Unmarshal.t
          val copy : t -> t
          val name : string
          val register_comparable :
            ?compare:(t -> t -> int) ->
            ?equal:(t -> t -> bool) -> ?hash:(t -> int) -> unit -> unit
          val is_comparable_set : unit -> bool
          val hash : t -> int
          val equal : t -> t -> bool
          val compare : t -> t -> int
          val mem_project :
            ((Project.project -> bool) -> t -> bool) option ref
        end
      module LOffset :
        sig
          type t = Lmap_bitwise.Make_bitwise(SidSet).LOffset.t
          val find_intervs :
            (Abstract_interp.Int.t -> Abstract_interp.Int.t -> y) ->
            Abstract_value.Int_Intervals.t -> t -> y
          val map : (bool * y -> bool * y) -> t -> t
          val fold :
            (Abstract_value.Int_Intervals.t -> bool * y -> '-> 'a) ->
            t -> '-> 'a
          val join : t -> t -> t
          val pretty : Format.formatter -> t -> unit
          val pretty_with_type :
            Cil_types.typ option -> Format.formatter -> t -> unit
          val collapse : t -> y
          val empty : t
          val is_empty : t -> bool
          val add_iset :
            exact:bool -> Abstract_value.Int_Intervals.t -> y -> t -> t
          val equal : t -> t -> bool
          val tag : t -> int
          module Datatype :
            sig
              type t = t
              val descr : Unmarshal.t
              val copy : t -> t
              val name : string
              val register_comparable :
                ?compare:(t -> t -> int) ->
                ?equal:(t -> t -> bool) -> ?hash:(t -> int) -> unit -> unit
              val is_comparable_set : unit -> bool
              val hash : t -> int
              val equal : t -> t -> bool
              val compare : t -> t -> int
              val mem_project :
                ((Project.project -> bool) -> t -> bool) option ref
            end
        end
      val pretty : Format.formatter -> t -> unit
      val empty : t
      val join : t -> t -> t
      val equal : t -> t -> bool
      val hash : t -> int
      val is_included : t -> t -> bool
      val add_binding : exact:bool -> t -> Locations.Zone.t -> y -> t
      val map_and_merge : (y -> y) -> t -> t -> t
      val filter_base : (Base.t -> bool) -> t -> t
      val find : t -> Locations.Zone.t -> y
      val find_base : t -> Locations.Zone.t -> LOffset.t
      exception Cannot_fold
      val uninitialize_locals : Cil_types.varinfo list -> t -> t
      val fold : (Locations.Zone.t -> bool * y -> '-> 'a) -> t -> '-> 'a
      val fold_base : (Base.t -> LOffset.t -> '-> 'a) -> t -> '-> 'a
      val map2 :
        ((bool * y) option -> (bool * y) option -> bool * y) -> t -> t -> t
      val copy_paste :
        f:(bool * y -> bool * y) ->
        Locations.location -> Locations.location -> t -> t
      exception Zone_unchanged
      val find_or_unchanged : t -> Locations.Zone.t -> y
    end
  type t = Datascope.InitSid.LM.t
  val empty : Datascope.InitSid.LM.t
  val find :
    Datascope.InitSid.LM.t -> Locations.Zone.t -> Datascope.InitSid.LM.y
  val add_zone :
    exact:bool ->
    Datascope.InitSid.LM.t ->
    Locations.Zone.t -> Datascope.SidSet.O.elt -> Datascope.InitSid.LM.t
  val test_and_merge :
    Datascope.InitSid.LM.t ->
    Datascope.InitSid.LM.t -> Datascope.InitSid.LM.t option
  val pretty : Format.formatter -> Datascope.InitSid.LM.t -> unit
end