sig val find : BatMap.S.key -> 'a BatMap.S.t -> 'a option val choose : 'a BatMap.S.t -> (BatMap.S.key * 'a) option val any : 'a BatMap.S.t -> (BatMap.S.key * 'a) option end