sig
  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 pretty : Format.formatter -> t -> unit
  val varname : t -> string
  val mem_project : (Project_skeleton.t -> bool) -> t -> bool
  val copy : t -> t
  val map :
    (bool * Lmap_bitwise.Location_map_bitwise.y ->
     bool * Lmap_bitwise.Location_map_bitwise.y) ->
    t -> t
  val fold :
    (Lattice_Interval_Set.Int_Intervals.t ->
     bool * Lmap_bitwise.Location_map_bitwise.y -> '-> 'a) ->
    t -> '-> 'a
  val fold_fuse_same :
    (Lattice_Interval_Set.Int_Intervals.t ->
     bool * Lmap_bitwise.Location_map_bitwise.y -> '-> 'a) ->
    t -> '-> 'a
  val join : t -> t -> t
  val pretty_with_type :
    Cil_types.typ option -> Format.formatter -> t -> unit
  val collapse : t -> Lmap_bitwise.Location_map_bitwise.y
  val empty : t
  val degenerate : Lmap_bitwise.Location_map_bitwise.y -> t
  val is_empty : t -> bool
  val add_iset :
    exact:bool ->
    Lattice_Interval_Set.Int_Intervals.t ->
    Lmap_bitwise.Location_map_bitwise.y -> t -> t
end