include sig ... end
type t = [ | `Bot| `Lifted1 of Priv.G.t| `Lifted2 of VD.t| `Top
]val arbitrary : unit -> 'aval pretty : unit -> t -> Printable.Pretty.docval show : [< `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] -> stringval relift :
([< `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top Lifted1 Lifted2 ] as 'a) ->
'aval name : unit -> stringval to_yojson :
[< `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] ->
[> `Assoc of (string * Yojson.Safe.t) list | `String of string ]val bot : unit -> [> `Bot ]val is_bot : [> `Bot ] -> boolval top : unit -> [> `Top ]val is_top : [> `Top ] -> boolval leq :
[> `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] ->
[> `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] ->
boolval pretty_diff : unit -> (t * t) -> Lattice.Pretty.docval join :
([> `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] as 'a) ->
'a ->
'aval meet :
([> `Bot | `Lifted1 of Priv.G.t | `Lifted2 of VD.t | `Top ] as 'a) ->
'a ->
'aval thread : [> `Bot | `Lifted2 of VD.t ] -> VD.tval create_priv : 'a -> [> `Lifted1 of 'a ]val create_thread : 'a -> [> `Lifted2 of 'a ]