Join_semilattice.WITH_JOIN
type t
The type held by the Join_semilattice.
Join_semilattice
val join : t -> t -> t
join x y is the least upper bound of {x,y}.
join x y
{x,y}