sig
  type t
  val narrow :
    Eva_lattice_type.With_Narrow.t ->
    Eva_lattice_type.With_Narrow.t ->
    Eva_lattice_type.With_Narrow.t Lattice_bounds.or_bottom
end