Module Lattice_bounds.TopBottom

type 'a t = 'a or_top_bottom
val return : 'a -> 'a t
val product : [< 'a t ] -> [< 'b t ] -> [> ('a * 'b) t ]
val bind : ('a -> [> 'b t ] as 'c) -> [< 'a t ] -> 'c
val map : ('a -> 'b) -> [< 'a t ] -> [> 'b t ]
val flatten : [< 'a t t ] -> [> 'a t ]

Datatype constructor

module Operators : sig ... end

Operators. In presence of simultaneous `Bottom and `Top in and+ / and*, everything narrows down to `Bottom. Every operators is redefined to ensure subtyping properties.

val hash : ('a -> int) -> 'a t -> int

Datatype

val equal : ('a -> 'a -> bool) -> 'a t -> 'a t -> bool
val compare : ('a -> 'a -> int) -> 'a t -> 'a t -> int
val pretty : (Format.formatter -> 'a -> unit) -> Format.formatter -> 'a t -> unit

Pretty-printing

val is_included : ('a -> 'b -> bool) -> 'a t -> 'b t -> bool
val join : ('a -> 'a -> [< 'a t ]) -> 'a t -> 'a t -> 'a t
val narrow : ('a -> 'a -> [< 'a t ]) -> 'a t -> 'a t -> 'a t