Module type Eva_lattice_type.With_Intersects

module type With_Intersects = Lattice_type.With_Intersects

type t 
val intersects : t -> t -> bool

intersects t1 t2 returns true iff the intersection of t1 and t2 is non-empty.