sig   val find : 'BatHashtbl.S.t -> BatHashtbl.S.key -> 'a option   val modify :     BatHashtbl.S.key ->     ('-> 'a) -> 'BatHashtbl.S.t -> (unit, exn) BatPervasives.result end