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