Via.Core
type t
The type held by the Meet_semilattice.
Meet_semilattice
val meet : t -> t -> t
meet x y is the greatest lower bound of {x, y}.
meet x y
{x, y}