Module type Eva_lattice_type.With_Narrow

type t
val narrow : t -> t -> t Lattice_bounds.or_bottom

over-approximation of intersection