sig val find : ('a, 'b) Extlib.ExtHashtbl.Hashtbl.t -> 'a -> 'b option end