sig
  type v = NodeSetLattice.t
  type map
  type lmap = Top | Map of map | Bottom
  type t = lmap
  val ty : t Type.t
  val name : string
  val descr : t Descr.t
  val packed_descr : Structural_descr.pack
  val reprs : t list
  val equal : t -> t -> bool
  val compare : t -> t -> int
  val hash : t -> int
  val pretty_code : Format.formatter -> t -> unit
  val internal_pretty_code : Type.precedence -> Format.formatter -> t -> unit
  val pretty : Format.formatter -> t -> unit
  val varname : t -> string
  val mem_project : (Project_skeleton.t -> bool) -> t -> bool
  val copy : t -> t
  val join : t -> t -> t
  val is_included : t -> t -> bool
  val join_and_is_included : t -> t -> t * bool
  val bottom : t
  val top : t
  module LOffset :
    sig
      type v = v
      type t
      val ty : t Type.t
      val name : string
      val descr : t Descr.t
      val packed_descr : Structural_descr.pack
      val reprs : t list
      val equal : t -> t -> bool
      val compare : t -> t -> int
      val hash : t -> int
      val pretty_code : Format.formatter -> t -> unit
      val internal_pretty_code :
        Type.precedence -> Format.formatter -> t -> unit
      val varname : t -> string
      val mem_project : (Project_skeleton.t -> bool) -> t -> bool
      val copy : t -> t
      type intervals = Int_Intervals.t
      val pretty : t Pretty_utils.formatter
      val pretty_generic :
        ?typ:Cil_types.typ ->
        ?pretty_v:(Format.formatter -> v -> unit) ->
        ?skip_v:(v -> bool) ->
        ?sep:string -> unit -> Format.formatter -> t -> unit
      val pretty_debug : t Pretty_utils.formatter
      val join : t -> t -> t
      val is_included : t -> t -> bool
      val find : Int_Intervals_sig.itv -> t -> v
      val find_iset : validity:Base.validity -> intervals -> t -> v
      val add_binding_intervals :
        validity:Base.validity ->
        exact:bool -> intervals -> v -> t -> t Bottom.or_bottom
      val add_binding_ival :
        validity:Base.validity ->
        exact:bool ->
        Ival.t -> size:Int_Base.t -> v -> t -> t Bottom.or_bottom
      val create : size:Integer.t -> v -> t
      val empty : t
      val size_from_validity : Base.validity -> Integer.t Bottom.or_bottom
      val map : (v -> v) -> t -> t
      type map2_decide =
          ReturnLeft
        | ReturnRight
        | ReturnConstant of v
        | Recurse
      val map2 :
        Hptmap_sig.cache_type ->
        (t -> t -> map2_decide) -> (v -> v -> v) -> t -> t -> t
      val fold : (intervals -> v -> '-> 'a) -> t -> '-> 'a
      val fold_fuse_same : (intervals -> v -> '-> 'a) -> t -> '-> 'a
      val fold_itv :
        ?direction:[ `LTR | `RTL ] ->
        entire:bool ->
        (Int_Intervals_sig.itv -> v -> '-> 'a) ->
        Int_Intervals_sig.itv -> t -> '-> 'a
      val fold_join_itvs :
        cache:Hptmap_sig.cache_type ->
        (Integer.t -> Integer.t -> v -> 'a) ->
        ('-> '-> 'a) -> '-> intervals -> t -> 'a
      val is_single_interval : t -> bool
      val single_interval_value : t -> v option
      val is_same_value : t -> v -> bool
      val clear_caches : unit -> unit
      val imprecise_write_msg : string ref
    end
  val is_empty : t -> bool
  val is_bottom : t -> bool
  val empty : t
  val empty_map : map
  val pretty_generic_printer :
    ?pretty_v:v Pretty_utils.formatter ->
    ?skip_v:(v -> bool) -> sep:string -> unit -> t Pretty_utils.formatter
  val pretty_debug : t Pretty_utils.formatter
  val add_binding : exact:bool -> t -> Locations.Zone.t -> v -> t
  val add_binding_loc : exact:bool -> t -> Locations.location -> v -> t
  val add_base : Base.t -> LOffset.t -> t -> t
  val remove_base : Base.t -> t -> t
  val find : t -> Locations.Zone.t -> v
  val filter_base : (Base.t -> bool) -> t -> t
  val map : (v -> v) -> t -> t
  val fold : (Locations.Zone.t -> v -> '-> 'a) -> map -> '-> 'a
  val fold_base : (Base.t -> LOffset.t -> '-> 'a) -> map -> '-> 'a
  val fold_fuse_same : (Locations.Zone.t -> v -> '-> 'a) -> map -> '-> 'a
  val fold_join_zone :
    both:(Int_Intervals.t -> LOffset.t -> 'a) ->
    conv:(Base.t -> '-> 'b) ->
    empty_map:(Locations.Zone.t -> 'b) ->
    join:('-> '-> 'b) -> empty:'-> Locations.Zone.t -> map -> 'b
  val map2 :
    cache:Hptmap_sig.cache_type ->
    symmetric:bool ->
    idempotent:bool ->
    empty_neutral:bool ->
    (LOffset.t -> LOffset.t -> LOffset.map2_decide) ->
    (v -> v -> v) -> map -> map -> map
  val shape : map -> LOffset.t Hptmap.Shape(Base.Base).t
  val imprecise_write_msg : string ref
  val clear_caches : unit -> unit
end