static <A> IPred<A> setToPredicate(Set<A> set) {
  ret set == null ? a -> false : a -> contains(set, a);
}