include sig ... end
type nonrec !'v t =
(Base.String.t, 'v, Base.String.comparator_witness) Base__Map.tval empty : (Base.String.t, 'a, Base.String.comparator_witness) Base.Map.tval of_alist_exn :
(Base.String.t * 'a) list ->
(Base.String.t, 'a, Base.String.comparator_witness) Base.Map.tval of_alist_reduce :
(Base.String.t * 'a) list ->
f:('a -> 'a -> 'a) ->
(Base.String.t, 'a, Base.String.comparator_witness) Base.Map.t