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