Lattice.FakeSingleton
module Base : PD
include module type of struct include Base end
include Printable.S
type t = Base.t
val equal : t -> t -> bool
val hash : t -> int
val compare : t -> t -> int
val show : t -> string
val pretty : unit -> t -> Printable.Pretty.doc
val printXml : 'a BatInnerIO.output -> t -> unit
val name : unit -> string
val to_yojson : t -> Yojson.Safe.t
val tag : t -> int
Unique ID, given by HConsed, for context identification in witness
val arbitrary : unit -> t QCheck.arbitrary
val relift : t -> t
val dummy : t
val leq : 'a -> 'b -> bool
val join : 'a -> 'b -> 'c
val widen : 'a -> 'b -> 'a
val meet : 'a -> 'b -> 'c
val narrow : 'a -> 'b -> 'a
val top : unit -> Base.t
val bot : unit -> Base.t
val is_top : 'a -> bool
val is_bot : 'a -> bool
val pretty_diff : unit -> 'a -> Pretty.doc