sig val find : ('a -> bool) -> 'a BatEnum.t -> 'a option end