Parameter Solver.D

type t
val equal : t -> t -> bool
val bot : t
val top : t
val join : t -> t -> t